(define places
(make-tree 'Alameda 
	(list (make-tree 'Berkeley 
			(list (make-tree 'Shattuck '())
			 	(make-tree 'Telegraph '())))
	      (make-tree 'Emeryville '()))))