Skip to content

Instantly share code, notes, and snippets.

@theRemix

theRemix/CompatibleTrivialFtpclient.clj

Created February 27, 2018 00:26
Show Gist options
  • Save theRemix/b21bcfa0b6ae7ddcf1098dd7b9708b73 to your computer and use it in GitHub Desktop.
Save theRemix/b21bcfa0b6ae7ddcf1098dd7b9708b73 to your computer and use it in GitHub Desktop.
Download ZIP
CompatibleTrivialFtpclient created by theRemix - https://repl.it/@theRemix/CompatibleTrivialFtpclient
Raw
CompatibleTrivialFtpclient.clj
(let [base 3,
exp 2]
(do
(defn multiply [x, y]
(* x y))
(defn exponent [x, y]
(reduce multiply (mapv (fn [_] x) (range y))))
(exponent base exp)))
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment