Binary

From mojo_puzzler
Jump to navigation Jump to search
Return to: Chialisp
Return to: Recursive Functions
(defun binary (n)
  (if (= n 1)
      (* n 2) 
      (* 2 (binary (- n 1)))))