mirror of
https://github.com/Open-Cascade-SAS/OCCT.git
synced 2026-05-11 01:58:22 +08:00
15 lines
327 B
Plaintext
15 lines
327 B
Plaintext
#K3----------------------------------------------
|
|
beziercurve cb 4 2 0 0 20 10 0 20 20 0 2 30 0
|
|
polyline pl 2 30 0 2 0 0
|
|
mkedge ed cb
|
|
wire ww ed pl
|
|
mkplane ww ww
|
|
revol rv ww 0 0 0 0 1 0 -180
|
|
plane p 0 15 12 0 0 1
|
|
pcone p p 7 5 15
|
|
bfuse f rv p
|
|
nexplode f f
|
|
depouille result f 0 0 1 f_5 10 0 0 27 0 0 1
|
|
|
|
set square 2510.01
|