0025133: TKOpenGl - Crash on closing a view containing presentations with capping
[occt.git] / tests / feat / featrf / A6
1 #old revolrib7
2 pcylinder c1 3 5
3 pcone c2 2 1.5 3
4 pcylinder c3 1 2
5 ttranslate c2 0 0 5
6 ttranslate c3 0 0 8
7 bfuse ss c1 c2
8 bfuse s ss c3
9 nexplode s e
10 blend s s 0.3 s_4 0.3 s_2
11
12 profile pp x 4 c 1 90 y 1 WW
13 trotate pp 0 0 0 0 1 0 -90
14 trotate pp 0 0 0 0 0 1 -90
15 ttranslate pp -3 0 5
16 plane pl -3 0 5 0 1 0
17
18 featrf s pp pl 0 0 0 0 0 1 0.2 0.2 1 1
19 featperform rf result
20
21 set square 204.661