tests/bugs/modalg_1/bug1255

   1 puts "================"
   2 puts "OCC1255"
   3 puts "================"
   4 puts ""
   5 ###############################################
   6 ## Exception in command 'section'
   7 ###############################################
   8
   9 restore [locate_data_file OCC1255.brep] a
  10 checkshape a
  11
  12 plane p1 0 -36.8067 0 0 1 0
  13 mkface f1 p1
  14
  15 bsection result a f1
  16
  17 checkprops result -l 5837.18
  18 checkshape result
  19
  20 set chsec [checksection result]
  21 puts $chsec
  22 if {![regexp {nb alone Vertices : 0} $chsec]} {
  23   puts "Error: The section is not closed"
  24 }
  25
  26 checkview -display result -2d -path ${imagedir}/${test_image}.png
  27