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
28
29
30
31
32
33
34
35
36
37
38
39
|
# 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
checkprops result -s 152
checkview -display result -2d -otherwise { ba bb } -s -path ${imagedir}/${test_image}.png
|
