apl>" <-APL2-------------------- sam269.txt ----------------------------> apl>" <- Selective specification ---------------------------------------> apl>costs#(39 19 29) (35 15 29 18 45) apl>costs#costs,`Z25 16 21 12.5 apl>1 2`Xcosts " s/b 19 19 apl>(1 2 `X costs) # 20 apl>costs 39 20 29 35 15 29 18 45 25 16 21 12.5 apl>(a b c)#1 2 3 apl>a,b,c 1 2 3 apl>L#r#2 2 4 R I 16 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 apl>((,r)[1 3 14 16])#'acde' apl>r a 2 c 4 5 6 7 8 9 10 11 12 13 d 15 e apl>m#'abcde' apl>((1 0 1 0 1) \ m) # I5 " produces 1 3 5 apl>m 1 3 5 apl>)off