0027341: Incorrect exact HLR results
[occt.git] / tests / bugs / modalg_6 / bug25880
1 puts "============"
2 puts "OCC25880"
3 puts "============"
4 puts ""
5 ###############################
6 ## fuzzy booleans with multiple tools
7 ###############################
8
9 bfuzzyvalue 0.00001
10 box Box018 13.550000190735 50.200000762939 3.299999952316
11 ttranslate Box018 -19.1 -0.1 2.35
12 #Object Label: Box
13
14 psphere Sphere002 1.600000023842 0 90 180
15 ttranslate Sphere002 -15 50.1 5.5
16 #Object Label: LeftSph
17
18 #bfuse to-Fusion-001-t Box018 Sphere002
19 pcylinder Cylinder006 1.600000023842 3.200000047684 180
20 ttranslate Cylinder006 -15 50.1 2.35
21
22 #Object Label: LeftHalfCyl
23 bfuse to-Fusion-002-t to-Fusion-001-t Cylinder006
24 psphere Sphere001 1.600000023842 0 90 180
25 trotate Sphere001 0 0 0 1 0 0 90
26 ttranslate Sphere001 -15 -0.1 5.5
27
28 #Object Label: RightSph
29 bfuse to-Fusion-003-t to-Fusion-002-t Sphere001
30 pcylinder Cylinder005 1.600000023842 3.200000047684 180
31 trotate Cylinder005 0 0 0 0 0 1 180
32 ttranslate Cylinder005 -15 -0.1 2.35
33
34 #Object Label: RightHalfCyl
35 bfuse to-Fusion-004-t to-Fusion-003-t Cylinder005
36 pcylinder Cylinder004 1.600000023842 50.200000762939 180
37 trotate Cylinder004 0 0 0 0 0.7071067811865475 0.7071067811865475 180
38 ttranslate Cylinder004 -15.000003814697 -0.100001335144 5.500000953674
39
40 #Object Label: TopHalfCyl
41 #bfuse Fusion to-Fusion-004-t Cylinder004
42 bclearobjects
43 bcleartools
44 baddobjects Box018
45 baddtools Sphere002 Cylinder006 Sphere001 Cylinder005 Cylinder004
46 bfillds
47 bbop result 1
48
49 checkprops result -s 1893.17 
50 checkshape result
51
52 set nbshapes_expected "
53 Number of shapes in shape
54  VERTEX : 32
55  EDGE : 51
56  WIRE : 20
57  FACE : 20
58  SHELL : 1
59  SOLID : 1
60  COMPSOLID : 0
61  COMPOUND : 1
62  SHAPE : 126
63 "
64 checknbshapes result -ref ${nbshapes_expected} -t -m "fuzzy booleans with multiple tools"
65 checkview -display result -3d -path ${imagedir}/${test_image}.png