0027557: Unstable HLR tests
[occt.git] / tests / bugs / modalg_6 / bug27274
1 puts "============"
2 puts "OCC27274"
3 puts "============"
4 puts ""
5 #######################################################################
6 # Wrong result of General Fuse operation on two cylinders
7 #######################################################################
8
9 pcylinder b1 50 145
10 tcopy b1 b2
11 trotate b2 0 0 0 1 0 0 45
12
13 bclearobjects
14 bcleartools
15 baddobjects b1
16 baddtools b2
17 bfillds
18 bbuild result
19
20 checkshape result
21
22 set nbshapes_expected "
23  VERTEX    : 5
24  EDGE      : 11
25  WIRE      : 10
26  FACE      : 10
27  SHELL     : 3
28  SOLID     : 3
29  COMPSOLID : 0
30  COMPOUND  : 1
31  SHAPE     : 43
32 "
33
34 checknbshapes result -ref ${nbshapes_expected} -t
35
36 checkprops result -s 154518