0027322: geom/revolution_00/A1: Incorrect pcurve creation
[occt.git] / tests / bugs / modalg_1 / bug13211_3
1 puts "============"
2 puts "OCC13211"
3 puts "============"
4 puts ""
5 #######################################################################
6 # Wrong treatment of conical faces in BOP algorithm
7 #######################################################################
8
9 vertex v1 136.06, 187.51, 0.0
10 vertex v2 136.06, 143.01, 0.0
11 edge e1 v1 v2
12 vertex v3 136.06, 143.01, 0.0
13 vertex v4 128.08, 143.01, 0.0
14 edge e2 v3 v4
15 vertex v5 128.08, 143.01, 0.0
16 vertex v6 127.88, 164.75, 0.0
17 edge e3 v5 v6
18 vertex v7 127.88, 164.75, 0.0
19 vertex v8 116.11, 176.00, 0.0
20 edge e4 v7 v8
21 vertex v9 116.11, 176.00, 0.0
22 vertex v10 136.06, 187.51, 0.0
23 edge e5 v9 v10
24 wire twire e1 e2 e3 e4 e5
25 mkplane tface twire
26 revol r1 tface 153.08, 143.01 0.0 1 0 0 360 1
27 revol r2 tface 136.06, 68.01, 0.0 0 1 0 360 1
28
29 bop r1 r2
30 bopcommon result
31
32 checkprops result -s 2990.42 
33 checkshape result
34 checknbshapes result -vertex 13 -edge 23 -wire 10 -face 10 -shell 1 -solid 1 -compsolid 0 -compound 1 -shape 59
35 checkview -display result -2d -path ${imagedir}/${test_image}.png