tests/bugs/modalg_7/bug29807_b5b

   1 puts "========"
   2 puts "0029807: Impossible to cut cone from prism"
   3 puts "========"
   4 puts ""
   5
   6 restore [locate_data_file bug29807-obj.brep] b1
   7 restore [locate_data_file bug29807-tool.brep] b2
   8
   9 trotate b2 +23.85857157145715500000 +12.00000000000000000000 +5.50000000000000000000 7 -7.14142842854285 0 5
  10 trotate b2 +23.85857157145715500000 +12.00000000000000000000 +5.50000000000000000000 7.1414284285428495 7.0000000000000009 -0 -38
  11 ttranslate b2 0 0 2
  12
  13 tolerance b2
  14
  15 explode b2 v
  16 settolerance b2_2 1.0e-7
  17
  18 checkshape b2
  19
  20 bcut result b1 b2
  21 checkshape result
  22 checkprops result -v 9465.86 -s 4013.42
  23 checknbshapes result -face 9 -wire 9
  24
  25 if {[regexp "Faulties" [bopargcheck result]]} {
  26   puts "Error: bopargcheck has found some faulties in result"
  27 }
  28
  29 vdisplay result
  30 vsetdispmode 1
  31 vviewparams -scale 52.4803 -proj 0.285421 0.0158136 0.958272 -up -0.810772 0.537155 0.232624 -at 29.6172 13.0268 3.82234 -eye 47.7439 14.0311 64.6808
  32
  33 checkview -screenshot -3d -path ${imagedir}/${test_image}.png