tests/bugs/modalg_1/bug179

   1
   2 puts "========"
   3 puts "OCC179"
   4 puts "========"
   5 puts ""
   6 ###########################################
   7 ## Bug in meshing of the enclosed face
   8 ###########################################
   9
  10 restore [locate_data_file OCC179.brep] result
  11
  12 tclean result
  13 isos result 0
  14 incmesh result 0.01
  15 triangles result
  16
  17 set tri 0
  18 set nod 0
  19
  20 set tri_info [trinfo result]
  21 regexp { +([-0-9.+eE]+) +triangles} $tri_info full tri
  22 regexp { +([-0-9.+eE]+) +nodes} $tri_info full nod
  23
  24 if { $tri == 1874 || $nod == 1861} {
  25     puts " OCC179  shading: OK"
  26 } else {
  27     puts " OCC179  shading: Faulty"
  28 }
  29
  30 set square 12229.8
  31 set 3dviewer 0