0026742: Update test cases for using checknbshapes procedure instead of global variables
[occt.git] / tests / bugs / moddata_3 / bug24108_2
1 puts "============"
2 puts "CR24108"
3 puts "============"
4 puts ""
5 #######################################################################
6 # Boolean fuse fails
7 # -- test #2: in rotated co-ordinates --
8 #######################################################################
9
10 puts "Load first shape ..."
11 restore [locate_data_file bug24108_face_411.brep] b1 
12 puts "Load second shape ..."
13 restore [locate_data_file bug24108_face_514.brep] b2 
14
15 puts "Rotate shapes by 45 deg around Z .."
16 trotate b1 0 0 0 0 0 1 45.
17 trotate b2 0 0 0 0 0 1 45.
18
19 explode b1 f
20 explode b2 f
21
22 copy b1_1 b1
23 copy b2_1 b2
24
25 puts "Prepare boolean operation ..."
26 bop b1 b2
27
28 puts "Start boolean operation ..."
29 bopfuse result
30 puts "Finish boolean operation ..."
31
32 set square 1328.78
33
34 # Analysis of "nbshapes result"
35 checknbshapes result -vertex 37 -edge 39 -wire 4 -face 3 -shell 0 -solid 0 -compsolid 0 -compound 1 -shape 84
36 set 3dviewer 1