(defn fac (n)
 (if (== n 0)
  1
  (
   (* n
    (fac (- n 1))
    )
   )
  )
 )

(let newline "
")

(defn pow (a b)
 (let next (- b 1))
 (if (== b 0) 1
  ((* a (pow a (- b 1))))
  )
 )

-- Here we output it
(print (fac 13) newline)
(print (pow 2 10) newline)