Skip to content

Instantly share code, notes, and snippets.

@tzafrirben

tzafrirben/hello_world_rec.clj

Created November 5, 2019 14:03
Show Gist options
  • Save tzafrirben/55eebcbc3fb4b47659d5817c7044a444 to your computer and use it in GitHub Desktop.
Save tzafrirben/55eebcbc3fb4b47659d5817c7044a444 to your computer and use it in GitHub Desktop.
Download ZIP
Raw
hello_world_rec.clj
(defn hello-world []
(loop [hello-world "Hello World"
spaces ""
diagonal []]
(if-not (seq hello-world)
(string/join "\n" diagonal)
(recur (rest hello-world)
(str spaces " ")
(conj diagonal (str spaces (first hello-world)))))))
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment