starter defs for class

starter defs for class - The first three lines of this file...

Info iconThis preview shows page 1. Sign up to view the full content.

View Full Document Right Arrow Icon
;; The first three lines of this file were inserted by DrScheme. They record metadata ;; about the language level of this file in a form that our tools can easily process. #reader(lib "" "lang")((modname dectrees- start) (read-case-sensitive #t) (teachpacks ()) (htdp-settings #8(#t constructor repeating-decimal #f #t none #f ()))) ;; a list[person] is ;; - empty, or ;; - (cons person list[person]) ;; a person is (make-person string number list[person]) (define-struct person (name year kids)) (define tree1 (make-person "Susan" 1960 (list (make-person "Joe" 1982 empty) (make-person "Helen" 1982
Background image of page 1
This is the end of the preview. Sign up to access the rest of the document.

This note was uploaded on 02/06/2008 for the course CS 1102 taught by Professor Fisler during the Fall '07 term at WPI.

Ask a homework question - tutors are online