mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-04-09 18:50:54 +03:00
25 lines
388 B
Plaintext
25 lines
388 B
Plaintext
#old revolrib12
|
|
pcylinder c1 3 5
|
|
pcone c2 2 1.5 3
|
|
pcylinder c3 1 2
|
|
ttranslate c2 0 0 5
|
|
ttranslate c3 0 0 8
|
|
bfuse ss c1 c2
|
|
bfuse s ss c3
|
|
nexplode s e
|
|
|
|
blend s s 0.3 s_4 0.3 s_2
|
|
|
|
vertex v1 -1. 0 8.1
|
|
vertex v2 -2.1 0 8.1
|
|
vertex v3 -2.1 0 4.8
|
|
edge e1 v1 v2
|
|
edge e2 v2 v3
|
|
wire w e1 e2
|
|
plane pl -1. 0 8.1 0 -1 0
|
|
|
|
featrf s w pl 0 0 0 0 0 1 0.2 0.2 1 1
|
|
featperform rf result
|
|
|
|
set square 191.996
|