show (map [(word ?1 ?2 ?3)] [a b c] [A B C] [1 2 3])
 ; [aA1 bB2 cC3]

(foreach [a b c] [A B C] [1 2 3] [print (word ?1 ?2 ?3)])  ; as above,
one per line