tests/bugs/modalg/bug578_1

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