1d54b807 |
1 | puts "====================================================================" |
2 | puts "OCC28828: New functionalities of BRepFilletAPI_MakeChamfer algorithm" |
3 | puts "====================================================================" |
4 | puts "" |
5 | |
6 | #KPart: plane + plane, symmetrical throat |
7 | polyline b 0 0 0 20 0 0 20 0 20 10 0 20 0 0 40 0 0 0 |
8 | mkplane b b |
9 | prism b b 0 20 0 |
10 | explode b e |
11 | donly b b_8 |
12 | |
13 | chamf_throat result b b_8 2. |
14 | |
15 | checkshape result |
16 | |
17 | checknbshapes result -solid 1 -shell 1 -face 8 -wire 8 -edge 15 -vertex 8 -shape 42 |
18 | |
19 | set tolres [checkmaxtol result] |
20 | |
21 | if { ${tolres} > 0.0001} { |
22 | puts "Error: bad tolerance of result" |
23 | } |
24 | |
25 | checkprops result -v 10129.4 -deps 1.e-7 |
26 | |
27 | checkview -display result -2d -path ${imagedir}/${test_image}.png |