mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-04-04 18:06:22 +03:00
17 lines
430 B
Plaintext
17 lines
430 B
Plaintext
#G6----------------------------------------------
|
|
beziersurf bs 4 4 \
|
|
0 0 0 5 0 0 10 0 0 15 0 0 \
|
|
0 5 0 5 5 -1 10 5 1 15 5 0 \
|
|
0 10 0 5 10 1 10 10 -1 15 10 0 \
|
|
0 15 0 5 15 0 10 15 0 15 15 0
|
|
mkface bs bs
|
|
prism p bs 0 0 5
|
|
profile pf o 10 7 1 p 0 -1 0 1 0 0 l 3 t 0 15 \
|
|
t -2 0
|
|
revol pr pf 8 7 0 0 0 1 120
|
|
bfuse f p pr
|
|
nexplode f f
|
|
depouille result f 0 0 1 f_7 -1 0 0 15 0 0 1
|
|
|
|
set square 980.006
|