0026742: Update test cases for using checknbshapes procedure instead of global variables
[occt.git] / tests / bugs / modalg_2 / bug20285_4
1 puts "============"
2 puts "OCC20285"
3 puts "============"
4 puts ""
5 #######################################################################
6 # SIGFPE Arithmetic exception on MakeCut Appendix for IPAL20277
7 #######################################################################
8
9 set BugNumber OCC20285
10
11 puts "Load first shape ..."
12 restore [locate_data_file OCC20285-main.brep] a1 
13 explode a1
14 renamevar a1_5 b1
15
16 puts "Load second shape ..."
17 restore [locate_data_file OCC20285-tool.brep] b2 
18
19 puts "Prepare boolean operation ..."
20 bop b1 b2
21
22 puts "Start boolean operation ..."
23 bopcut result
24 puts "Finish boolean operation ..."
25
26 set square 92859.7
27
28 checknbshapes result -vertex 13 -edge 19 -wire 8 -face 8 -shell 1 -solid 1 -compsolid 0 -compound 1 -shape 51
29
30 set 2dviewer 0