Skip to content

Instantly share code, notes, and snippets.

@evinism
Created April 29, 2019 03:05
Show Gist options
  • Save evinism/28a4a6d3b33cb00518152faf5f906d76 to your computer and use it in GitHub Desktop.
Save evinism/28a4a6d3b33cb00518152faf5f906d76 to your computer and use it in GitHub Desktop.
λf.λx.f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.a)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.a)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.a)(f(λa.λb.a)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.a)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.a)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.a)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.a)(f(λa.λb.a)(f(λa.λb.a)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.a)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.a)(f(λa.λb.a)(f(λa.λb.a)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.a)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.a)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.a)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.a)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.a)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.a)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.a)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.a)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.a)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)(f(λa.λb.a)(f(λa.λb.b)x)))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment