Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- ; Q. Is there more polished form to write this procedure?
- (let1 f (lambda (x y) (cons x y)) ; Actually, f is an arbitrary procedure.
- (map (lambda (outer-element)
- (map (lambda (inner-element)
- (f inner-element outer-element))
- '(a b c)))
- '(1 2 3)))
- ; ==> ((a . 1) (b . 1) (c . 1)
- ; (a . 2) (b . 2) (c . 2)
- ; (a . 3) (b . 3) (c . 3))
Add Comment
Please, Sign In to add comment