0027322: geom/revolution_00/A1: Incorrect pcurve creation
[occt.git] / tests / bugs / modalg_1 / buc60714
1
2 puts "========================"
3 puts "BUC60714"
4 puts "========================"
5
6 profile f x 30 y 20 x -30
7 explode f w 
8 vertex v1 0 0 0 
9 vertex v2 0 -10 -10
10 edge e v1 v2
11
12 wire w e
13 mksweep f_1
14 setsweep -FR
15 addsweep w
16
17 ########
18 #does'nt work
19 buildsweep result -C -S
20
21 checkprops result -s 1979.9 
22 checkshape result
23 checkview -display result -2d -path ${imagedir}/${test_image}.png
24