tests/blend/tolblend_simple/B7

   1 #pcone c 25 50 50
   2 #ttranslate c 0 0 50
   3 #prism p c_3 0 25 -50
   4 #explode c f
   5 #explode p F
   6 #glue s c p c_3 p_2
   7
   8 restore [locate_data_file CFI_7_a4_fhl.rle] s
   9 tscale  s 0 0 0 SCALE1
  10 explode s e
  11 blend result s 15*SCALE1 s_2
  12 explode result So
  13 tcopy result_1 result
  14 explode result V
  15
  16 checkprops result -s 781868