1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
|
# 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 8 4 5 P 0 0 -1 1 0 0 D 0 1 C 1 180 Y -2 C 1 180 W
## this works but seems to have wrong Y direction
mkplane pl prof
prism ob pl 0 0 1
bfuse result ba ob
checkprops result -s 180.283
checkview -display result -2d -otherwise { ba ob } -s -path ${imagedir}/${test_image}.png
|
