tests/bugs/mesh/bug25281

   1 puts "========="
   2 puts "CR25281"
   3 puts "========="
   4 puts ""
   5 ###############################################
   6 # BRepMesh_IncrementalMesh does not return
   7 ###############################################
   8
   9 pload XDE
  10
  11 param xstep.cascade.unit M
  12 stepread [locate_data_file bug25281_tess_infloop_extract.step] a *
  13 incmesh a_1 0.0002 1
  14 set trinfo_s [trinfo a_1]
  15 regexp {([0-9]+) triangles} ${trinfo_s} str nbtri_s
  16 regexp {([0-9]+) nodes} ${trinfo_s} str nbnod_s
  17
  18 if { ${nbtri_s} == 0 } {
  19    puts "Error: shape contains 0 triangles"
  20 } else {
  21    puts "OK: shape contains ${nbtri_s} triangles"
  22 }
  23
  24 if { ${nbnod_s} == 0 } {
  25    puts "Error: shape contains 0 nodes"
  26 } else {
  27    puts "OK: shape contains ${nbnod_s} nodes"
  28 }
  29
  30 vinit
  31 vdisplay a_1
  32 vfit
  33 set only_screen 1