Commerce report for Sirius Outpost: 01:42:53 PM Sat Jun 24, 2051

-=-=-        Docking Log        -=-=-

The Pratfall II just left.

You have 181,446 credits and 0 empty cargo holds.

 > Captain's log

 > random

(define (find term lst)
  (  print "trying car: " ( car lst ) ) ;; for debug
  ( cond ((null? lst) #f)
	 ;; status quo: it returns the last thing it looked at if finds none
         ((equal? (car lst) term) lst)
	 ;; todo handle alists with pair
         ((list? (car lst)) find (car lst))
         (else (find term (cdr lst)))))