tests/bugs/modalg_7/bug29073

   1 puts "======="
   2 puts "0029073"
   3 puts "======="
   4 puts ""
   5 ##################################################
   6 # Regression: General Cut produces invalid shape
   7 ##################################################
   8
   9 brestore [locate_data_file bug29073_M6.brep] b1
  10 brestore [locate_data_file bug29073_Shell.brep] b2
  11
  12 bclearobjects
  13 bcleartools
  14 baddobjects b1
  15 baddtools b2
  16 bfillds
  17
  18 # check the result of SECTION
  19 bbop rsec 4
  20 checknbshapes rsec -edge 1 -vertex 2
  21
  22 # check the result of GF
  23 bbuild rgf
  24 checkshape rgf
  25 checkprops rgf -s 163.708 -v 115.912
  26 checknbshapes rgf -wire 25 -face 24 -shell 3 -solid 1
  27
  28 # check the CUT
  29 bbop result 3
  30 checkshape result
  31 checkprops result -s 0.000713987
  32 checknbshapes result -wire 1 -face 1
  33
  34 checkview -display result -2d -path ${imagedir}/${test_image}.png