apl>" <------------------------- sam151.txt ----------------------------> apl>)copy cap2/handbook/wksp/su shape thru trunc apl>)copy cap2/handbook/wksp/vx xvec apl>6 thru 11 2 6 8 10 apl>47 thru 43 0.5 47 46.5 46 45.5 45 44.5 44 43.5 43 apl>(10*I5)trunc 12345+Lio#0 5 4 3 2 1 apl>.1 1 10 trunc 100%7 2 4 1 apl>b#L#1 xvec 1 0 1 1 0 1 1 apl>b`\a#L#' 'shape'tom dick harry' tom dick harry tom dick harry apl>3 xvec 1 0 1 1 1 0 0 0 1 1 1 apl>)off