1 puts "===================================================================="
2 puts "OCC28828: New functionalities of BRepFilletAPI_MakeChamfer algorithm"
3 puts "===================================================================="
6 #KPart: cylinder + plane, symmetrical throat
8 box a2 -20 -20 -20 40 40 40
16 chamf_throat result b ee 2.
20 checknbshapes result -solid 1 -shell 1 -face 9 -wire 10 -edge 17 -vertex 11 -shape 50
22 set tolres [checkmaxtol result]
24 if { ${tolres} > 1.001e-7} {
25 puts "Error: bad tolerance of result"
28 checkprops result -v 73699.8 -deps 1.e-7
30 checkview -display result -2d -path ${imagedir}/${test_image}.png