tests/boolean/bfuse_simple/J9

   1 # Original bug : pro13305
   2 # Date : 4June98
   3
   4 pcylinder cyl 3 5
   5
   6 vertex v1 0 3 2
   7 vertex v2 0 4 2
   8 vertex v3 0 4 3
   9 vertex v4 0 3 3
  10
  11 edge e1 v1 v2
  12 edge e2 v2 v3
  13 edge e3 v3 v4
  14 edge e4 v4 v1
  15
  16 wire w e1 e2 e3 e4
  17 mkplane f w
  18
  19 revol ring f 0 0 0 0 0 1 269
  20 ## works correctly for values 270 and above
  21 ## problem associated with the straight
  22 ## edge of the cylinder
  23
  24 bfuse result cyl ring
  25
  26 set square 190.356