tests/bugs/modalg_2/bug418_1

   1
   2 puts "========================"
   3 puts " OCC418 "
   4 puts "CTS20370"
   5 puts "(case 1)"
   6 puts "========================"
   7 puts ""
   8
   9 restore [locate_data_file CTO904_cts20370-part.rle] part
  10 checkshape part
  11
  12 restore [locate_data_file cts20370-tool.rle] tool
  13 checkshape tool
  14
  15 bsection sec part tool
  16 checkshape -top sec
  17
  18 bcut result part tool
  19 checkshape -top result
  20
  21 set square 273365.
  22 set 2dviewer 0