tests/bugs/modalg/buc60532_1

   1 puts "==========="
   2 puts "BUC60532"
   3 puts "==========="
   4
   5 restore [locate_data_file buc60532a.brep] p
   6 puts [checkshape p]
   7
   8 restore [locate_data_file buc60532b.brep] t1
   9 puts [checkshape t1]
  10
  11 restore [locate_data_file buc60532c.brep] t2
  12 puts [checkshape t2]
  13
  14 # create halfspace
  15 halfspace h1 t1 20 20 0
  16 halfspace h2 t2 20 20 0
  17
  18 # first cut
  19 bcut result p h1
  20
  21 set square 81.8172
  22 set 2dviewer 0
  23