5 ###############################
6 ## ShapeUpgrade_UnifySameDomain very large performance difference for seemingly similar shapes
7 ###############################
9 restore [locate_data_file bug27085_fused_primitive.fast.brep] fp
17 set q [dchrono h show]
19 regexp {CPU user time: ([-0-9.+eE]+) seconds} $q full z
24 if { $z > ${max_time} } {
25 puts "Elapsed time is more than ${max_time} seconds - Faulty"
27 puts "Elapsed time is less than ${max_time} seconds - OK"