tests/bugs/modalg/bug578_2

   1 puts "================"
   2 puts "OCC578"
   3 puts "OCC582"
   4 puts "OCC583"
   5 puts "================"
   6 puts ""
   7
   8 restore [locate_data_file OCC578_w1.brep] w1
   9 checkshape w1
  10
  11 restore [locate_data_file OCC578_w2.brep] w2
  12 checkshape w2
  13
  14 set x 1
  15 set y 1
  16 set z 0.5
  17 box b ${x} ${y} ${z}
  18 checkshape b
  19
  20 bfuse res1 w1 w2
  21 checkshape res1
  22
  23 bop b res1
  24 bopcut result
  25
  26 set square 4.84596
  27 set 3dviewer 0