0025968: boolean returning an invalid shape
[occt.git] / tests / bugs / modalg_7 / bug25968
1 puts "============"
2 puts "OCC25968"
3 puts "============"
4 puts ""
5 ######################################################
6 # boolean returning an invalid shape
7 ######################################################
8
9 # Construct resulting shape.
10 pcylinder Cylinder004 50 1000
11 pcylinder Cylinder005 45 1000
12 bcut Cut003 Cylinder004 Cylinder005
13 pcylinder Cylinder006 45 102
14 trotate Cylinder006 0 0 0 1 0 0 90
15 ttranslate Cylinder006 0 51 1000
16 #Object Label: Cutout_rowconnector_top001
17 bcut Cut004 Cut003 Cylinder006
18 pcylinder Cylinder007 45 102
19 trotate Cylinder007 0 0 0 1 0 0 90
20 ttranslate Cylinder007 0 51 0
21 bcut Cut005 Cut004 Cylinder007
22 ttranslate Cut005 0 110 0
23 pcylinder Cylinder044 50 800
24 trotate Cylinder044 0 0 0 1 0 0 90
25 ttranslate Cylinder044 0 610 0
26 pcylinder Cylinder045 45 795
27 trotate Cylinder045 0 0 0 1 0 0 90
28 ttranslate Cylinder045 0 605 0
29 bcut Cut032 Cylinder044 Cylinder045
30 pcylinder Cylinder046 45 55
31 pcylinder Cylinder047 45 92
32 trotate Cylinder047 0 0 0 1 0 0 90
33 ttranslate Cylinder047 0 46 0
34 bcut Cut033 Cylinder046 Cylinder047
35 bcut Cut039 Cut032 Cut033
36 pcylinder Cylinder048 45 55
37 pcylinder Cylinder049 45 92
38 trotate Cylinder049 0 0 0 1 0 0 90
39 ttranslate Cylinder049 0 46 0
40 bcut Cut034 Cylinder048 Cylinder049
41 ttranslate Cut034 0 110 0
42 bcut Cut040 Cut039 Cut034
43 pcylinder Cylinder050 45 55
44 pcylinder Cylinder051 45 92
45 trotate Cylinder051 0 0 0 1 0 0 90
46 ttranslate Cylinder051 0 46 0
47 bcut Cut035 Cylinder050 Cylinder051
48 ttranslate Cut035 0 220 0
49 bcut Cut041 Cut040 Cut035
50 pcylinder Cylinder052 45 55
51 pcylinder Cylinder053 45 92
52 trotate Cylinder053 0 0 0 1 0 0 90
53 ttranslate Cylinder053 0 46 0
54 bcut Cut036 Cylinder052 Cylinder053
55 ttranslate Cut036 0 330 0
56 bcut Cut042 Cut041 Cut036
57 pcylinder Cylinder054 45 55
58 pcylinder Cylinder055 45 92
59 trotate Cylinder055 0 0 0 1 0 0 90
60 ttranslate Cylinder055 0 46 0
61 bcut Cut037 Cylinder054 Cylinder055
62 ttranslate Cut037 0 440 0
63 bcut Cut043 Cut042 Cut037
64 pcylinder Cylinder056 45 55
65 pcylinder Cylinder057 45 92
66 trotate Cylinder057 0 0 0 1 0 0 90
67 ttranslate Cylinder057 0 46 0
68 bcut Cut038 Cylinder056 Cylinder057
69 ttranslate Cut038 0 550 0
70 bcut Cut044 Cut043 Cut038
71 pcylinder Cylinder058 45 102
72 trotate Cylinder058 0 0 0 0 1 0 90
73 ttranslate Cylinder058 -51 -190 0
74 bcut Cut045 Cut044 Cylinder058
75 trotate Cut045 0 0 0 0 1 0 180
76 ttranslate Cut045 0 0 1000
77 pcylinder Cylinder 50 1000
78 pcylinder Cylinder001 45 1000
79 bcut Cut Cylinder Cylinder001
80 pcylinder Cylinder002 45 102
81 trotate Cylinder002 0 0 0 1 0 0 90
82 ttranslate Cylinder002 0 51 1000
83 bcut Cut001 Cut Cylinder002
84 pcylinder Cylinder003 45 102
85 trotate Cylinder003 0 0 0 1 0 0 90
86 ttranslate Cylinder003 0 51 0
87 bcut Cut002 Cut001 Cylinder003
88 bfuse Fusion Cut045 Cut002
89 bfuse Fusion001 Cut005 Fusion
90
91 # Checshape
92 checkshape Fusion001
93
94 # check properties
95 checkprops Fusion001 -s 1.52134e+006
96
97 # check number of shapes in resulting
98 checknbshapes Fusion001 -vertex 73 -edge 111 -wire 42 -face 32 -shell 1 -solid 1