tests/blend/simple/N8

   1 #pcylinder s1 5 13
   2 #box s2 0 0 0 3 5 7
   3 #ttranslate s2 0 -7 1
   4 #ttranslate s1 s2 5 5 0
   5 #cut s s1 s2
   6 #save s F1234.draw
   7
   8 restore F1234.draw s
   9 tscale s 0 0 0 SCALE1
  10 explode s e
  11 blend result s 0.5*SCALE1 s_5 0.5*SCALE1 s_4 0.5*SCALE1 s_6 0.5*SCALE1 s_7
  12
  13 set square 60404.6