puts "============" puts "OCC5805" puts "============" ####################################################################### # BRepOffsetAPI_MakeThickSolid behaves unstably and produces very different results. ####################################################################### set BugNumber OCC5805 # # * # | \ # | \ # | \ # | \ # | \ # | \ # | * v3 \ # | | \ \ # | | \ \ # | | \ \ # | | \ \ # | | /* v2 * # | | / / # | | / / # | | / / # | * / # | v1 / # | / # | / # | / # | / # | / # |/ # * # set z1 10 set z2 -10 # triangle1 polyline UpCover 0 0 ${z1} 5 5 ${z1} 0 10 ${z1} 0 0 ${z1} # triangle2 polyline BottomCover -5 -5 ${z2} 10 10 ${z2} -5 20 ${z2} -5 -5 ${z2} set issolid 1 set isruled 1 if [catch { thrusections s ${issolid} ${isruled} UpCover BottomCover } catch_result] { puts "Faulty ${BugNumber} : thrusections is wrong" } set distance -0.5 catch { OFFSETSHAPE $distance {s_4} $calcul $type } set square 2011.91 set nb_v_good 12 set nb_e_good 18 set nb_w_good 10 set nb_f_good 9 set nb_sh_good 1 set nb_sol_good 1 set nb_compsol_good 0 set nb_compound_good 0 set nb_shape_good 51 set index [lsearch [whatis s] Closed] if {$index == -1} { puts "Faulty ${BugNumber} : s is not Closed shape" } set index [lsearch [whatis result] Closed] if {$index == -1} { puts "Faulty ${BugNumber} : result is not Closed shape" } set 2dviewer 0