tests/bugs/moddata/bug37_1

   1
   2 puts "================"
   3 puts "OCC37"
   4 puts "================"
   5 puts ""
   6
   7 restore [locate_data_file OCC37.brep] sh
   8 explode sh
   9 puts [checkshape sh_1]
  10 puts [checkshape sh_2]
  11
  12 bfuse result sh_1 sh_2
  13 puts [checkshape result]
  14
  15 set check_square 1
  16 set square 665013
  17 set 2dviewer 0
  18
  19
  20
  21