a5q3 - ; The first three lines of this file were inserted...

Info iconThis preview shows pages 1–2. 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 "htdp-advanced-reader.ss" "lang")((modname a5q3) (read-case-sensitive #t) (teachpacks ()) (htdp-settings #(#t constructor repeating-decimal #t #t none #f ()))) ;; Assignment 5 Question 3 ;; Ru Wang r46wang 20319247 ; ;; a5q3 ;; 2009 daylight saving: March 8 to October31. ;; State variables: (define-struct holiday (name month day status)) (define xmas (make-holiday 'xmas 12 25 'unknown)) (define thanksgiving (make-holiday 'thanksgiving 10 12 'unknown)) (define remembrance (make-holiday 'remembrance 11 11 'unknown)) (define canadaday (make-holiday 'canadaday 7 1 'unknown)) (define easter (make-holiday 'easter 4 13 'unknown)) (define mybday (make-holiday 'mybday 3 7 'unknown)) (define womensday (make-holiday 'womensday 3 8 'unknown)) (define mystery (make-holiday 'mystery 11 1 'unknown)) ;; update-daylight: holiday -> (void)
Background image of page 1

Info iconThis preview has intentionally blurred sections. Sign up to view the full version.

View Full DocumentRight Arrow Icon
Image of page 2
This is the end of the preview. Sign up to access the rest of the document.

This note was uploaded on 10/21/2010 for the course CS 116 taught by Professor T.vasiga during the Fall '09 term at Waterloo.

Page1 / 2

a5q3 - ; The first three lines of this file were inserted...

This preview shows document pages 1 - 2. Sign up to view the full document.

View Full Document Right Arrow Icon
Ask a homework question - tutors are online