0029351: Boolean Operations create invalid pcurves
[occt.git] / tests / bugs / modalg_2 / bug4717_5
CommitLineData
a4eba920 1puts "TODO OCC12345 ALL: Error : is WRONG because number of "
352ffd73 2
3puts "============"
4puts "OCC4717"
5puts "============"
6puts ""
7######################################################
8# A regression of new Boolean Operations
9# (cfi/002/H3)
10######################################################
11
12dset SCALE1 10
13protect SCALE1
14
15box b -20 -20 -20 40 40 20
16ellipse w1 0 0 0 15 10
17mkedge w1 w1 -pi/2 pi/2
18trotate w1 0 0 0 1 0 0 90
19wire w w1
20revol r w 0 0 0 0 0 1 360
21shape s So
22add r s
23trotate s b 0 0 0 1 1 0 -40
24trotate s b 0 0 0 0 0 1 -10
25tscale b 0 0 0 SCALE1
26tscale s 0 0 0 SCALE1
27
28bop s b
29boptuc result
30
58cf74e0 31checkprops result -s 680565
32checkshape result
352ffd73 33
a4eba920 34checknbshapes result -vertex 11 -edge 16 -wire 8 -face 7 -shell 1 -solid 1 -compsolid 0 -compound 1 -shape 45
5747059b 35checkview -display result -2d -path ${imagedir}/${test_image}.png