tests/bugs/mesh/bug24775

   1 puts "================"
   2 puts "CR24775"
   3 puts "================"
   4 puts ""
   5 ###############################################
   6 ## False detecting of intersection in BRepMesh_Classifier class.
   7 ###############################################
   8
   9 restore [locate_data_file bug24775_face.brep] face
  10 vinit
  11 vdisplay face
  12 vfit
  13
  14 set trinfo_s [trinfo face]
  15 regexp {([0-9]+) triangles} ${trinfo_s} str nbtri_s
  16 regexp {([0-9]+) nodes} ${trinfo_s} str nbnod_s
  17 regexp {deflection ([0-9.+e-]+)} ${trinfo_s} str defl_s
  18
  19 if { ${nbtri_s} == 0 } {
  20    puts "Error: shape contains 0 triangles"
  21 } else {
  22    puts "OK: shape contains triangles"
  23 }
  24
  25 if { ${nbnod_s} == 0 } {
  26    puts "Error: shape contains 0 nodes"
  27 } else {
  28    puts "OK: shape contains nodes"
  29 }
  30
  31 if { ${defl_s} == 0 } {
  32    puts "Error: deflection is 0"
  33 } else {
  34    puts "OK: deflection is good"
  35 }