tests/bugs/mesh/bug25551

   1 puts "TODO OCC25551 ALL: Error: BRepMesh can produce internal nodes outside the face interior based on distorted BSpline surface"
   2
   3 puts "================"
   4 puts "OCC25551"
   5 puts "================"
   6 puts ""
   7 #######################################################################################
   8 # BRepMesh can produce internal nodes outside the face interior based on distorted BSpline surface
   9 #######################################################################################
  10
  11 restore [locate_data_file bug25551_m-a-i-B6.brep] res
  12
  13 explode res f
  14
  15 triangles res_2
  16
  17 set ExpectedArea 0.208305
  18 set tol_abs 0.00001
  19
  20 set prop [ sprops res_2]
  21 regexp {Mass\s*:\s*([0-9.e+-]+)} $prop prop_s Area
  22
  23 if { [expr abs($Area - $ExpectedArea)] > $tol_abs } {
  24   puts "OK: BRepMesh not produce internal nodes outside the face interior based on distorted BSpline surface"
  25 } else {
  26   puts "Error: BRepMesh can produce internal nodes outside the face interior based on distorted BSpline surface"
  27 }
  28
  29 smallview
  30 donly res_2
  31 top
  32 fit
  33 checkview -screenshot -2d -path ${imagedir}/${test_image}.png