(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.

Leave a Comment