リストのtransposed(zip)を書いて少し修正したら動いた。 Starting program: /home/troter/work/jmc-lisp/jmcl > (map (lambda (a b) (* a b)) '(1 2 3 4 5) '(1 2 3 4 5)) (map (lambda (a b) (* a b)) (quote (1 2 3 4 5)) (quote (1 2 3 4 5))) (1 4 9 16…