Skip to content

Instantly share code, notes, and snippets.

@netogallo
Last active August 29, 2015 13:57
Show Gist options
  • Select an option

  • Save netogallo/9364522 to your computer and use it in GitHub Desktop.

Select an option

Save netogallo/9364522 to your computer and use it in GitHub Desktop.
Exp Complexity
data ExpTree t = ExpTree t (ExpTree t) (ExpTree t)
-- '.' denotes function composition in Haskell ie:
-- (f . g) x == f (g x)
f1 = ExpTree . ExpTree . ExpTree
f2 = f1 . f1 . f1 . f1
f3 = f2 . f2 . f2
f4 = f3 . f3 . f3 . f3
main = undefined
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment