Skip to content

Instantly share code, notes, and snippets.

@rsp
Last active November 29, 2017 14:09
Show Gist options
  • Save rsp/f881a2ae22d9d3585891da75cae1b66a to your computer and use it in GitHub Desktop.
Save rsp/f881a2ae22d9d3585891da75cae1b66a to your computer and use it in GitHub Desktop.
inFullMobile Language Wars: Round 1 - Scheme Solution 1 by @rsp - See: https://gist.github.com/rsp/d8bdbafa09f24f99eebc8ed60fe205c8
(define (e a b c) (if (= c 0) a (e (b a) b (- c 1))))
(define (f a) (lambda (b) (lambda (c)
(e c b (- ((a (lambda (a) (+ a 1))) 0) 1)))))
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment