Skip to content

Instantly share code, notes, and snippets.

@tcdowney

tcdowney/lat?.scm

Created January 9, 2013 15:58
Show Gist options

  • Select an option

    Learn more about clone URLs
  • Save tcdowney/4494254 to your computer and use it in GitHub Desktop.

Select an option

Learn more about clone URLs
Save tcdowney/4494254 to your computer and use it in GitHub Desktop.
Download ZIP
Definition for lat? for The Little Schemer. #myversion
Raw
lat?.scm
;; A lat is a list of atoms.
(define lat?
(lambda (l)
(cond
((null? l) #t)
((not (atom? (car l))) #f)
(else (lat? (cdr l))))))
@tcdowney
Copy link
Author

tcdowney commented Jan 9, 2013

Atom? definition for Schemes that lack it.

https://gist.github.com/4485191

Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment