(define trotter? taking-gre?)
‘nough said. I’ve got the GRE today, so don’t expect to see any witty computer posts.
Still, I’ll leave you with one snippet of life-code to tide you over:
(define (get-to-work person transit-options)
(cond ((subway-running? transit-options) (take-subway person))
((have-feet? person)
(start-walking person transit-options))))
(define (start-walking person transit-options)
(cond ((step-in-slush-puddle? person)
(if (cab-close? transit-options)
(take-cab person)
(curse-heavens person)))
(else
(laugh-at-people-in-slush-puddle person)
(arrive-at-work person))))
And that’s a very basic version of getting to work.