tests/bugs/modalg_6/bug27664_2

   1 puts "========"
   2 puts "OCC27664"
   3 puts "========"
   4 puts ""
   5 #################################################
   6 # Incomplete intersection curve from the attached shapes
   7 #################################################
   8
   9 restore [locate_data_file bug27664_pl0.brep] pl0
  10 restore [locate_data_file bug27664_nsh_8.brep] nsh_8
  11
  12 bclearobjects
  13 bcleartools
  14
  15 baddobjects pl0
  16 baddtools nsh_8
  17
  18 bfillds
  19
  20 # section
  21 bbop rs 4
  22
  23 if { [string compare -nocase [checksection rs] " nb alone Vertices : 0\n\n"] } {
  24   puts "ERROR: the section is not closed"
  25 } else {
  26   puts "The section is OK"
  27 }
  28
  29 # cut
  30 bbop result 2
  31
  32 smallview
  33 donly result
  34 fit
  35
  36 checkview -screenshot -2d -path ${imagedir}/${test_image}.png
  37
  38 checkprops result -s 33.8629