tests/blend/tolblend_buildvol/A2

   1 #box s 0 0 0 100 100 100
   2 #explode s f
   3 #sewing s s_1 s_3
   4
   5 restore [locate_data_file 7_B2.draw] s
   6 tscale  s 0 0 0 SCALE1
   7 explode s E
   8 mkevol P s
   9 updatevol s_1 0 10*SCALE1 1 20*SCALE1 2 0*SCALE1
  10 buildevol
  11 explode P Sh
  12 copy P_1 result
  13
  14 set square 485351