Skip to content

Instantly share code, notes, and snippets.

@kouddy

kouddy/SICP 1.12

Created February 22, 2015 02:56
Show Gist options
  • Save kouddy/3dd72fa82b1443dd227a to your computer and use it in GitHub Desktop.
Save kouddy/3dd72fa82b1443dd227a to your computer and use it in GitHub Desktop.
Download ZIP
Raw
SICP 1.12
(define (pascal row col)
(cond ((= col 1) 1)
((= col row) 1)
(else (+ (pascal (- row 1) (- col 1))
(pascal (- row 1) col)))))
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment