0030760: Modeling Algorithms - Intersection fails in Occt 7.3.0
[occt.git] / tests / bugs / modalg_7 / bug28828_18
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 10 30 50
8 box a2 -25 -25 -20  50 50 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 3. 6.
18
19 checkshape result
20
21 checknbshapes result -solid 1 -shell 1 -face 9 -wire 10 -edge 17 -vertex 11 -shape 50
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 156442 -deps 1.e-7
30
31 checkview -display result -2d -path ${imagedir}/${test_image}.png