tests/bugs/modalg_5/bug22027

   1 puts "========="
   2 puts "OCC22027"
   3 puts "========="
   4 puts ""
   5 ###########################################################
   6 # Bop command between two faces raises exception
   7 ###########################################################
   8
   9 circle c 0 0 0 25
  10 ellipse e 0 0 0 25 10
  11 mkedge c c
  12 mkedge e e
  13 wire w1 c
  14 wire w2 e
  15 mkplane f1 w1
  16 mkplane f2 w2
  17 bop f1 f2
  18 bopcut result
  19
  20 checkprops result -s 1178.1
  21 checkshape result
  22 checknbshapes result -vertex 2 -edge 4 -wire 2 -face 2
  23
  24 checkview -display result -2d -path ${imagedir}/${test_image}.png
  25
  26