tests/bugs/modalg_7/bug28248

   1 puts "======="
   2 puts "OCC28248"
   3 puts "======="
   4 puts ""
   5 ################################################################
   6 # HLR Algo result is retrieved from the last added shape only
   7 ################################################################
   8
   9 box b1 -10 -10 0 20 20 5
  10 pcylinder c1 5 10
  11
  12 hprj proj 0 0 0 0 1 0 0 0 1
  13 hremove
  14
  15 houtl b1_outl b1
  16 hfill b1_outl proj 0
  17 hload b1_outl
  18
  19 houtl c1_outl c1
  20 hfill c1_outl proj 0
  21 hload c1_outl
  22
  23 hsetprj proj
  24 hupdate
  25 hhide
  26 hres2d
  27
  28 compound vl v1l vnl vol vil hl h1l hnl hol hil result
  29
  30 checknbshapes result -edge 16
  31
  32 don result
  33 smallview +X+Y
  34 fit
  35 checkview -screenshot -2d -path ${imagedir}/${test_image}.png