tests/bugs/moddata/bug183_1

   1
   2 puts "========================"
   3 puts " OCC183 "
   4 puts "(case 1)"
   5 puts "========================"
   6 puts ""
   7
   8 restore [locate_data_file f1] b1
   9 puts [checkshape b1]
  10
  11 restore [locate_data_file f4] b2
  12 puts [checkshape b2]
  13
  14 bcommon result b1 b2
  15 puts [checkshape result]
  16
  17 set check_square 1
  18 set square 315.159
  19 set 2dviewer 0
  20