tests/blend/simple/T1

   1 #box b -30 -30 -30 60 60 30
   2 #ptorus s 20 5 0 90
   3 #fuse f1 s b
   4 #pcylinder c 6 45
   5 #trotate c 0 0 0 1 0 0 90
   6 #ttranslate c 0 0 -10
   7 #fuse s f1 c
   8 #save s 6_D56.draw
   9
  10 restore [locate_data_file CFI_6_d56fgy.rle] s
  11 tscale s 0 0 0 SCALE2
  12 explode s E
  13 blend result s 8*SCALE2 s_3
  14
  15 set square 15179.9