1 puts "================"
3 puts "================"
5 #######################################################################
6 # The section curve between two cylindrical faces is incomplete
7 #######################################################################
9 restore [locate_data_file bug25224_Input_5.brep] b1
10 restore [locate_data_file bug25224_Input_21.brep] b2
16 set log [bopcurves b1_1 b2_1]
18 regexp {Tolerance Reached=+([-0-9.+eE]+)\n+([-0-9.+eE]+)} ${log} full Toler NbCurv
20 if {${Toler} > ${MaxTol}} {
21 puts "Error: Tolerance is too big!"
23 checklength c_1 -l 0.52377379499528021
33 checkprops result -s 21.4983
36 checknbshapes result -vertex 10 -edge 19 -wire 13 -face 13 -shell 3 -solid 3 -compsolid 0 -compound 1 -shape 62
37 checkview -display result -3d -path ${imagedir}/${test_image}.png