;; transpose list paying no attention to key (define ivl:transpose (lambda (val lst) (map (lambda (i) (+ i val)) lst)))