Adding test cases from grid chl
[occt.git] / tests / bugs / modalg / bug240_2
1 puts "TODO OCC12345 ALL: Error : Result shape is WRONG because it must"
2 puts "TODO OCC12345 ALL: Error : The length of result shape is"
3
4 puts "========================"
5 puts " OCC240 "
6 puts "========================"
7
8 #################################################
9 ## puts "  BOPTUC      case_2_shell.brep and case_2_edge2.brep"
10 #################################################
11  puts " " 
12 restore [locate_data_file OCC240a.brep] a
13 restore [locate_data_file case_2_edge2.brep] b
14  puts [bop a b]
15  puts [boptuc result]
16  set nb_info [nbshapes result]
17  set nb_v_good 14
18  set nb_e_good 7
19
20  set length 0
21  set 2dviewer 0
22