tests/bugs/modalg_4/bug7626_2

   1 puts "============"
   2 puts "OCC7626"
   3 puts "============"
   4 puts ""
   5 ######################################################
   6 # Bad result of bcut operation
   7 ######################################################
   8
   9 set BugNumber OCC7626
  10
  11 psphere s 10
  12 box b 10 0 0 20 20 20
  13 trotate b 10 0 0 0 0 1 45
  14
  15 bcommon result s b
  16
  17 checkprops result -s 199.095
  18 checkshape result
  19
  20 checknbshapes result -vertex 2 -edge 3 -wire 3 -face 3 -shell 1 -solid 1 -compsolid 0 -compound 1 -shape 14
  21 checkview -display result -2d -path ${imagedir}/${test_image}.png
  22