Skip to content

Instantly share code, notes, and snippets.

@saftacatalinmihai

saftacatalinmihai/Understanding recursion.clj

Last active May 24, 2016 07:16
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save saftacatalinmihai/090f2bdfa137743ab75f to your computer and use it in GitHub Desktop.
Save saftacatalinmihai/090f2bdfa137743ab75f to your computer and use it in GitHub Desktop.
Download ZIP
Raw
Understanding recursion.clj
( def enlightened 9001 )
( defn alter
[state-of-mind]
( inc state-of-mind )
)
( defn recursion-understood?
[state-of-mind]
( = state-of-mind enlightened)))
( defn understand-recursion
[state-of-mind]
( if ( recursion-understood? state-of-mind)
"Congratulations"
( understand-recursion ( alter state-of-mind))
)
)
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment