tests/bugs/moddata/fra62476_2

   1
   2 puts "=========="
   3 puts "FRA62476"
   4 puts ""
   5 puts "=================================="
   6 puts "It takes visual check for this BUG"
   7 puts "=================================="
   8 puts ""
   9
  10 restore [locate_data_file fra62476b.brep] result
  11 puts [checkshape result]
  12
  13 tclean result
  14 incmesh result .1
  15 triangles result
  16
  17 set info [trinfo result]
  18 regexp { +([-0-9.+eE]+) +triangles} $info full tri
  19 regexp { +([-0-9.+eE]+) +nodes} $info full nod
  20
  21 if { $tri !=239 && $nod != 145 } {
  22    puts "Shady FRA62476: here may be shading problem, number tri & nod
  23    are changed"
  24 }
  25
  26 set 3dviewer 0
  27
  28