Adding test cases from grid chl
[occt.git] / tests / bugs / modalg / bug250_4
1 puts "TODO OCC12345 ALL: Error : The length of result shape is"
2 puts "TODO OCC12345 ALL: Error : Result shape is WRONG because it must contains"
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 set nb_info [nbshapes result]
17 set nb_v_good 9
18 set nb_e_good 9
19
20 set length 0
21 set 2dviewer 0