tests/bugs/modalg_6/bug27519_2

   1 puts "========"
   2 puts "0027519: Inconsistent result of SECTION operation"
   3 puts "========"
   4 puts ""
   5
   6 restore [locate_data_file bug27448_b1255_2.brep] b
   7 plane p 0 -36.8067 0 0 1 0
   8 mkface f p
   9 bsection result b f
  10 set chsec [checksection result]
  11 puts $chsec
  12 if {![regexp {nb alone Vertices : 4} $chsec]} {
  13   puts "Error: the section is not closed"
  14 }
  15
  16 set chsi [bopcheck result]
  17 puts $chsi
  18 if {![regexp {This shape seems to be OK.} $chsi]} {
  19   puts "Error: the section is self-interfered"
  20 }