40093367 |
1 | ## Extension of /users/skv/testref/cd1/ED/cto/009/B1 |
2 | |
3 | vertex v1 -1 -1 0 |
4 | vertex v2 1 -1 0 |
5 | vertex v3 1 1 0 |
6 | vertex v4 -1 1 0 |
7 | |
8 | edge e1 v1 v2 |
9 | edge e2 v2 v3 |
10 | edge e3 v3 v4 |
11 | edge e4 v4 v1 |
12 | |
13 | wire wa e1 e2 e3 e4 |
14 | mkplane fa wa |
15 | prism ba fa 0 0 1 |
16 | |
17 | |
18 | circle c 0 0 0 1 |
19 | mkedge eb c |
20 | wire wb eb |
21 | mkplane fb wb |
22 | prism cylb fb 0 0 2 |
23 | |
24 | |
25 | bcommon result ba cylb |
26 | |
58cf74e0 |
27 | checkprops result -s 12.5664 |
5747059b |
28 | checkview -display result -2d -s -otherwise { ba cylb } -path ${imagedir}/${test_image}.png |