puts "TODO OCC11111 ALL: Faulty OCC21970" puts "TODO OCC11111 ALL: Error : The command is not valid. The square is" puts "TODO OCC11111 ALL: Error : The square of result shape is 0" puts "TODO OCC11111 ALL: Error : Result shape is WRONG" puts "============" puts "OCC21970" puts "============" puts "" ###################################################### # FPE exception in BRepMesh on degenerate face not handled in OCCT DRAW on WNT built with VC8 by WOK ###################################################### set BugNumber OCC21970 restore [locate_data_file OCC21970-stringers-f485.brep] result set text [incmesh result 1] set r [regexp {Failure} $text] set status1 0 if {$r == 1} { set status1 1 } set square 624989 set nb_v_good 3806 set nb_e_good 3808 set nb_w_good 756 set nb_f_good 730 set nb_sh_good 0 set nb_sol_good 0 set nb_compsol_good 0 set nb_compound_good 1 set nb_shape_good 9101 if { ${status1} != 0} { puts "Faulty ${BugNumber}" } else { puts "OK ${BugNumber}" } vinit tclean result vsetdispmode 1 vdisplay result vfit set 3dviewer 1