tests/bugs/mesh/bug27959

   1 puts "=========="
   2 puts "OCC27959"
   3 puts "=========="
   4 puts ""
   5 #######################################################################
   6 # BRepMesh_Delaun produces mesh with gaps on internal edges
   7 #######################################################################
   8 # test for #27959: check that resulting mesh does not contain gaps.
   9
  10 restore [locate_data_file bug27959_ms.brep] result
  11
  12 tclean result
  13 checkview -display result -3d -path ${imagedir}/${test_image}.png
  14
  15 set log [tricheck result]
  16 if { [llength $log] != 0 } {
  17   puts "Error : Mesh contains gaps"
  18 } else {
  19   puts "OK : Mesh produced without gaps"
  20 }
  21