1d54b807 |
1 | puts "====================================================================" |
2 | puts "OCC28828: New functionalities of BRepFilletAPI_MakeChamfer algorithm" |
3 | puts "====================================================================" |
4 | puts "" |
5 | |
6 | pcylinder a1 10 50 |
7 | box a2 -20 -20 -20 40 40 40 |
8 | nurbsconvert ba2 a2 |
9 | bfuse b a1 ba2 |
10 | savehistory hh |
11 | |
12 | explode a1 f |
13 | generated ee hh a1_1 |
14 | explode ee e |
15 | explode a1 e |
16 | |
17 | donly b a1_1 ee_1 |
18 | |
19 | chamf_throat result b a1_1 1. ee_1 2. |
20 | |
21 | checkshape result |
22 | |
23 | checknbshapes result -solid 1 -shell 1 -face 10 -wire 11 -edge 19 -vertex 12 -shape 55 |
24 | |
25 | set tolres [checkmaxtol result] |
26 | |
27 | if { ${tolres} > 0.00014} { |
28 | puts "Error: bad tolerance of result" |
29 | } |
30 | |
31 | checkprops result -v 73639.9 -deps 1.e-7 |
32 | |
33 | checkview -display result -2d -path ${imagedir}/${test_image}.png |