tests/bugs/modalg_7/bug26776

   1 puts "========"
   2 puts "OCC26776"
   3 puts "========"
   4 puts ""
   5 ##################################################
   6 # Bad result of section algorithm
   7 ##################################################
   8
   9 restore [locate_data_file bug26580-plate-2.brep] a2
  10 restore [locate_data_file bug26776_b2.brep] b2
  11
  12 bsection result a2 b2
  13
  14 checkshape result
  15
  16 checknbshapes result -vertex 2 -edge 1
  17
  18 regexp {nb alone Vertices : ([-0-9.+eE]+)} [checksection result] full nbv
  19
  20 if { $nbv != 2 } {
  21   puts "Error : Bad result of section algorithm"
  22 } else {
  23   puts "OK: Good result of section algorithm"
  24 }
  25
  26 checkprops result -l 27.3439
  27
  28 smallview
  29 don result
  30 fit
  31
  32 checkview -screenshot -2d -path ${imagedir}/${test_image}.png