puts "========" puts "OCC26674" puts "========" puts "" ################################################# # Performance regression in BRepExtrema_DistShapeShape in OCCT 6.9.0 in compare with OCCT 6.7.1 ################################################# set max_time 1 restore [locate_data_file OCC26674-face.brep] a1 restore [locate_data_file OCC26674-shell.brep] a2 dchrono cr reset dchrono cr start distmini dd a1 a2 dchrono cr stop set log [dchrono cr show] regexp {CPU user time: ([-0-9.+eE]+) seconds} $log full z puts "$z" if { $z > ${max_time} } { puts "Elapsed time of BRepExtrema_DistShapeShape is more than ${max_time} seconds - Error" } else { puts "Elapsed time of BRepExtrema_DistShapeShape is less than ${max_time} seconds - OK" } regexp {([-0-9.+eE]+)$} [dump dd_val] full dist set expected_dist 0.0 set tol_abs_dist 1.0e-07 set tol_rel_dist 0.0 checkreal "Dump of dd_val" ${dist} ${expected_dist} ${tol_abs_dist} ${tol_rel_dist}