1d54b807 |
1 | puts "====================================================================" |
2 | puts "OCC28828: New functionalities of BRepFilletAPI_MakeChamfer algorithm" |
3 | puts "====================================================================" |
4 | puts "" |
5 | |
6 | #KPart: cone + plane, penetrating throat |
7 | pcone a1 40 0 70 |
8 | box a2 -50 -50 -20 100 100 40 |
9 | bfuse b a1 a2 |
10 | savehistory hh |
11 | |
12 | explode a1 f |
13 | modified ff hh a1_1 |
14 | generated ee hh a1_1 |
15 | donly b ff ee |
16 | |
17 | chamf_throat_with_penetration result b ee ff 2. 3. |
18 | |
19 | checkshape result |
20 | |
21 | checknbshapes result -solid 1 -shell 1 -face 8 -wire 9 -edge 17 -vertex 11 -shape 48 |
22 | |
23 | set tolres [checkmaxtol result] |
24 | |
25 | if { ${tolres} > 1.001e-7} { |
26 | puts "Error: bad tolerance of result" |
27 | } |
28 | |
29 | checkprops result -v 446299 -deps 1.e-7 |
30 | |
31 | checkview -display result -2d -path ${imagedir}/${test_image}.png |