tests/bugs/mesh/bug23614_4

   1 puts "================"
   2 puts "CR23614"
   3 puts "================"
   4 puts ""
   5 #####################################################################
   6 # BRepMesh creates incorrect triangulation on the attached models
   7 #####################################################################
   8
   9 restore [locate_data_file bug23614_face4.brep] f4
  10 tclean f4
  11 incmesh f4 0.01
  12 set info [trinfo f4]
  13 regexp {([0-9]+) triangles} $info full tri
  14 regexp {([0-9]+) nodes} $info full nod
  15
  16 # compare number of triangles
  17 if { $tri == 0 } {
  18     puts "Error: face contains $tri triangles"
  19 } else {
  20     puts "OK: face contains $tri triangles"
  21 }
  22
  23 # compare number of nodes
  24 if { $nod == 0 } {
  25     puts "Error : face contains $nod nodes"
  26 } else {
  27     puts "OK: face contains $nod nodes"
  28 }
  29
  30 top
  31 fit
  32 triangles f4
  33 checkview -screenshot -2d -path ${imagedir}/${test_image}.png
  34
  35