puts "TODO OCC12345 ALL: Error : Result shape is WRONG" puts "============" puts "OCC15850" puts "============" puts "" ####################################################################### # Regression in BOP - wrong results for simple shapes with Bspline geometry ####################################################################### set BugNumber OCC15850 restore [locate_data_file OCC15850_bb.brep] bb restore [locate_data_file OCC15850_bc.brep] bc bop bb bc bopsection result set length 37.6991 set nb_v_good 4 set nb_e_good 4 set nb_w_good 0 set nb_f_good 0 set nb_sh_good 0 set nb_sol_good 0 set nb_compsol_good 0 set nb_compound_good 1 set nb_shape_good 9 regexp {nb alone Vertices +: +([-0-9.+eE]+)} [checksection result] full Vertices set good_Vertices 0 if { ${Vertices} != ${good_Vertices} } { puts "Faulty ${BugNumber}" } else { puts "OK ${BugNumber}" } set 2dviewer 0