Adding test cases from grid chl
[occt.git] / tests / bugs / modalg / bug472_1
1 puts "TODO OCC12345 ALL: Faulty shapes in variables faulty_1 to faulty_8"
2 puts "TODO OCC12345 ALL: Error : The square of result shape is"
3
4 puts "========================"
5 puts " OCC472 "
6 puts "(case 1)"
7 puts "========================"
8 puts ""
9 #####################################################
10 ## Bad result of Fuse Operation (Cut&Common - bad too). SAM1470 (#2634) 
11 #####################################################
12
13 restore [locate_data_file OCC472a.brep] b1 
14 puts [checkshape b1]
15
16 restore [locate_data_file OCC472b.brep] b2
17 puts [checkshape b2]
18
19 bcut result b1 b2
20
21 set square 0
22 set 2dviewer 0