mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-04-05 18:16:23 +03:00
21 lines
321 B
Plaintext
21 lines
321 B
Plaintext
#old revolrib3
|
|
pcylinder c1 2 5
|
|
pcylinder c2 1 3
|
|
ttranslate c2 0 0 5
|
|
bfuse s c1 c2
|
|
|
|
profile pp x 2 c 1 90 WW
|
|
trotate pp 0 0 0 0 1 0 -90
|
|
trotate pp 0 0 0 0 0 1 -90
|
|
ttranslate pp -2 0 5
|
|
nexplode s e
|
|
|
|
blend s s 0.3 s_2
|
|
plane pl -2 0 5 0 1 0
|
|
|
|
featrf s pp pl 0 0 0 0 0 1 0.2 0.2 1 1
|
|
featperform rf result
|
|
|
|
|
|
set square 111.509
|