Integration part of tests of grid chl
[occt.git] / tests / bugs / modalg / bug407_2
1
2 puts "========================"
3 puts " OCC407 "
4 puts "(case 2)"
5 puts "========================"
6 puts ""
7
8 pcylinder b1 1 4
9 pcylinder b2 1 4
10 trotate b2 0 0 2 1 0 0 90
11 trotate b2 0 0 2 0 1 0 60
12
13 bcut result b2 b1 
14 checkshape -top result
15
16 set square 31.4159
17 set 2dviewer 0
18