tests/boolean/bcommon_simple/G5

   1 dset r sqrt(2)
   2
   3
   4 vertex v1 0 0 0
   5 vertex v2 1 0 0
   6 vertex v3 1 1 0
   7 vertex v4 0 1 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 vertex v5 0 0 0
  19 vertex v6 1.5 0 0
  20 vertex v7 1.5 r/2 0
  21 vertex v8 0 r/2 0
  22
  23 edge e5 v5 v6
  24 edge e6 v6 v7
  25 edge e7 v7 v8
  26 edge e8 v8 v5
  27
  28 wire wb e8 e7 e6 e5
  29 mkplane fb wb
  30
  31 prism bb fb 0 0 1
  32
  33 trotate bb 0 0 0 0 0 1 45
  34
  35 bcommon result ba bb
  36
  37 checkprops result -s 4.41421