0026742: Update test cases for using checknbshapes procedure instead of global variables
[occt.git] / tests / bugs / modalg_2 / bug250_4
1 puts "TODO OCC12345 ALL: Error : The length of result shape is"
2 puts "TODO OCC12345 ALL: Error :  is WRONG because number of"
3
4 puts "========================"
5 puts " OCC250 "
6 puts "========================"
7
8 #################################################
9 ## puts " BOPFUSE     case_9_wire_a.brep and case_9_wire2.brep"
10 #################################################
11  puts " " 
12 restore [locate_data_file case_9_wire_a.brep] a
13 restore [locate_data_file case_9_wire2.brep] b
14 puts [bop a b]
15 puts [bopfuse result]
16
17 checknbshapes result -vertex 9 -edge 9
18 set length 0
19 set 2dviewer 0