Adding test cases from grid chl
[occt.git] / tests / bugs / modalg / bug249_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 " OCC249 "
6 puts "========================"
7
8 #################################################
9 ## puts " BOPFUSE     case_9_wire_a.brep and case_9_edge3.brep"
10 #################################################
11  puts " " 
12 restore [locate_data_file case_9_wire_a.brep] a
13 restore [locate_data_file case_9_edge3.brep] b
14  puts [bop a b]
15  puts [bopfuse result]
16  set nb_info [nbshapes result]
17  set nb_v_good 6
18  set nb_e_good 5
19  
20  set length 0
21  set 2dviewer 2
22