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