tests/bugs/modalg_6/bug27746_1

   1 puts "========"
   2 puts "OCC27746"
   3 puts "========"
   4 puts ""
   5 #################################################
   6 # Incomplete result of SECTION operation
   7 #################################################
   8
   9 restore [locate_data_file bug27746_first.brep] b1
  10 restore [locate_data_file bug27746_second.brep] b2
  11
  12 settolerance b2 1.e-7
  13 fixshape b2 b2
  14
  15 bclearobjects
  16 bcleartools
  17 baddobjects b1
  18 baddtools b2
  19 bfillds
  20 bbop result 4
  21
  22 regexp {nb alone Vertices : ([-0-9.+eE]+)} [checksection result] full nbv
  23 if { $nbv > 6 } { puts "Error : Section is incorrect" }
  24
  25 checkprops result -l 88.2082