0023087: Upgrade of the OCCT test system
[occt.git] / tests / boolean / bcommon_simple / I1
1 ## Extension of /users/skv/testref/cd1/ED/cto/009/E1
2
3
4 vertex v1 -1 -1 0
5 vertex v2 1.5 -1 0
6 vertex v3 1.5 2 0
7 vertex v4 -1 2 0
8
9 edge e1 v1 v2
10 edge e2 v2 v3
11 edge e3 v3 v4
12 edge e4 v4 v1
13
14 wire wa e1 e2 e3 e4
15 mkplane fa wa
16 prism ba fa 0 0 1
17
18
19 vertex v3 0 0 0 
20 vertex v4 1 0 0
21 vertex v5 1 0 2
22 vertex v6 0 0 2
23 edge eb v3 v4
24 edge ec v4 v5
25 edge ed v5 v6
26 edge ee v6 v3
27 wire wb eb ec ed ee
28 mkplane pb wb
29 revol cylb pb 0 0 0 0 0 1 360
30
31
32 bcommon result ba cylb
33
34 set square 12.5664