| 1 | # Permutation of all forms of construction |
| 2 | # when fUsing a box and an oblong prism |
| 3 | |
| 4 | # M series from top |
| 5 | |
| 6 | vertex vp1 3 3 0 |
| 7 | vertex vp2 8 3 0 |
| 8 | vertex vp3 8 9 0 |
| 9 | vertex vp4 3 9 0 |
| 10 | edge eap vp1 vp2 |
| 11 | edge ebp vp2 vp3 |
| 12 | edge ecp vp3 vp4 |
| 13 | edge edp vp4 vp1 |
| 14 | wire wp eap ebp ecp edp |
| 15 | mkplane fp wp |
| 16 | prism ba fp 0 0 5 |
| 17 | |
| 18 | profile prof O 4 3 5 P 0 0 -1 1 0 0 D -1 0 C 1 180 X 2 C 1 180 W |
| 19 | mkplane pl prof |
| 20 | prism ob pl 0 0 1 |
| 21 | |
| 22 | bfuse result ba ob |
| 23 | |
| 24 | checkprops result -s 180.283 |
| 25 | checkview -display result -2d -otherwise { ba ob } -s -path ${imagedir}/${test_image}.png |