mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-04-04 18:06:22 +03:00
32 lines
513 B
Plaintext
32 lines
513 B
Plaintext
# Permutation of all forms of construction
|
|
# when fUsing a box and an oblong prism
|
|
|
|
# M series from top
|
|
|
|
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 5
|
|
|
|
profile prof O 3 6 5 P 0 0 -1 1 0 0 D 0 -1 C 1 180 Y 2 C 1 180 W
|
|
vertex v 3 6 5
|
|
|
|
## this works but seems to have wrong Y direction
|
|
|
|
mkplane pl prof
|
|
prism ob pl 0 0 1
|
|
|
|
bfuse result ba ob
|
|
|
|
|
|
|
|
|
|
set square 180.283
|