tests/bugs/moddata_1/bug15519

   1 puts "TODO OCC12345 ALL: Error: Number of triangles"
   2 puts "TODO OCC12345 ALL: Error: Number of nodes"
   3 puts "TODO OCC12345 ALL: Error: Maximal deflection"
   4
   5 puts "============"
   6 puts "OCC15519"
   7 puts "============"
   8 puts ""
   9 #######################################################################
  10 # Exception while meshing shape
  11 #######################################################################
  12
  13 set BugNumber OCC15519
  14
  15 restore [locate_data_file OCC15519.brep] result
  16 tclean result
  17
  18 set Deflection 1.
  19 catch {incmesh result ${Deflection} }
  20
  21 if { [string compare $tcl_platform(platform) "windows"] == 0 }  {
  22    set good_tri  96265
  23    set good_nod  71339
  24    set good_defl 27.956052399907215
  25 } else {
  26    set good_tri  95582
  27    set good_nod  70796
  28    set good_defl 0.99827404224216676
  29 }
  30
  31 checktrinfo result -tri ${good_tri} -nod ${good_nod} -defl ${good_defl} -tol_rel_defl 0.001 -tol_rel_tri 0.001 -tol_rel_nod 0.001
  32 checkview -display result -2d -path ${imagedir}/${test_image}.png