tests/bugs/modalg_7/bug29311_4

   1 puts "========"
   2 puts "OCC29311"
   3 puts "========"
   4 puts ""
   5 #################################################
   6 # Implementation of the Oriented Bounding Boxes (OBB) functionality
   7 #################################################
   8
   9 ptorus result 20 5
  10 trotate result 5 10 15 1 1 1 28
  11
  12 puts "AABB"
  13 bounding result -shape ra -dump -save x1 y1 z1 x2 y2 z2
  14
  15 dump x1 y1 z1 x2 y2 z2
  16
  17 set VaExp [ dval (x2-x1)*(y2-y1)*(z2-z1) ]
  18
  19 checkprops ra -v $VaExp
  20
  21 puts "OBB"
  22 bounding result -shape ro -dump -obb
  23
  24 checkprops ro -v 28694.7
  25
  26 smallview
  27 fit
  28 checkview -screenshot -2d -path ${imagedir}/${test_image}.png