mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-04-03 17:56:21 +03:00
40 lines
498 B
Plaintext
40 lines
498 B
Plaintext
# Permuation of all forms of construction
|
|
# when fUsing a box and a prism
|
|
|
|
vertex vp1 3 3 0
|
|
vertex vp2 8 3 0
|
|
vertex vp3 8 9 0
|
|
vertex vp4 3 9 0
|
|
|
|
edge eap vp1 vp2
|
|
edge ebp vp2 vp3
|
|
edge ecp vp3 vp4
|
|
edge edp vp4 vp1
|
|
|
|
wire wp eap ebp ecp edp
|
|
mkplane fp wp
|
|
|
|
prism ba fp 0 0 4
|
|
|
|
# prism from top
|
|
|
|
vertex v1 3 2 1
|
|
vertex v2 4 2 1
|
|
vertex v3 4 3 1
|
|
vertex v4 3 3 1
|
|
|
|
edge ea v1 v2
|
|
edge eb v2 v3
|
|
edge ec v3 v4
|
|
edge ed v4 v1
|
|
|
|
wire w ea eb ec ed
|
|
mkplane f w
|
|
|
|
prism bb f 0 0 -1
|
|
|
|
bfuse result ba bb
|
|
|
|
|
|
set square 152
|