1 ;; The first three lines of this file were inserted by DrScheme. They record metadata
2 ;; about the language level of this file in a form that our tools can easily process.
3 #reader(lib "htdp-advanced-reader.ss" "lang")((modname |37.2|) (read-case-sensitive #t) (teachpacks ((lib "draw.ss" "teachpack" "htdp") (lib "arrow.ss" "teachpack" "htdp") (lib "gui.ss" "teachpack" "htdp"))) (htdp-settings #(#t constructor repeating-decimal #t #t none #f ((lib "draw.ss" "teachpack" "htdp") (lib "arrow.ss" "teachpack" "htdp") (lib "gui.ss" "teachpack" "htdp")))))
4 Data Definition
5 
6 A word is a (listof letters) where letters is a symbol from 'a ... 'z and '_.
7 
8 ;;Constants
9 
10 (define WORDS '((o c t o p u s)
11                 (s q u i d)
12                 (s a l m o n)
13                 (t i l a p i a)
14                 (b a s s)
15                 (s h r i m p)
16                 (c l a m s)
17                 (m u s s e l)
18                 (o y s t e r)
19                 (c r a b)
20                 (s t a r f i s h)
21                 (j e l l y f i s )
22                 (s e a l i o n)))
23                 
24 
25 
26 ;;State Variables
27 
28 
29 ;;chosen-word : word
30 
31 (define chosen-word