tests/bugs/moddata/bug252_2

   1
   2 puts "================"
   3 puts "OCC252"
   4 puts "================"
   5 puts ""
   6
   7 pload QAcommands
   8
   9 restore [locate_data_file OCC252.brep] a
  10 puts [checkshape a]
  11
  12 explode a w
  13
  14 OCC252 result a_466 a 1
  15
  16 regexp {Mass +: +([-0-9.+eE]+)} [lprops result] full len
  17
  18 if { ${len} != 0 } {
  19    puts "Error : OCC252"
  20 }
  21
  22 set 2dviewer 0