Restoring test cases removed by last commit.
[occt.git] / tests / bugs / moddata / bug31
1 puts "TODO OCC12345 ALL: Faulty shapes in variables faulty_1 to faulty_"
2
3 puts "================"
4 puts "OCC31"
5 puts "================"
6 puts ""
7
8 restore [locate_data_file OCC31.brep] sh 
9 puts [checkshape sh]
10
11 explode sh f
12
13 explode sh_2 e
14
15 chamf res1 sh sh_2_1 sh_2 7 7 
16 puts [checkshape res1]
17
18 explode res1 f
19
20 explode res1_5 e
21
22 chamf res2 res1 res1_5_4 res1_5 7 7
23 puts [checkshape res2]
24
25 explode res2 f
26
27 explode res2_4 e
28
29 chamf result res2 res2_4_1 res2_4 7 7
30 puts [checkshape result]
31
32 set check_square 1
33 set square 107634
34 set 2dviewer 0