  The first three lines of this file were inserted by  . They record metadata
;; about the language level of this file in a form that our tools can easily process.
#reader(lib "htdp-intermediate-lambda-reader.ss" "lang")((modname ex330-model1-TS) (read-case-sensitive #t) (teachpacks ()) (htdp-settings #(#t constructor repeating-decimal #f #t none #f () #f)))
;; data difinitions
  A Dir.v1 ( short for directory ) is one of :
; – '()
; – (cons File.v1 Dir.v1)
; – (cons Dir.v1 Dir.v1)
 
; A File.v1 is a String.


;; constants
(define TS '("read!"
             ("part1" "part2" "part3")
             (("hang" "draw")
              ("read!"))))
 about the language level of this file in a form that our tools can easily process.
 data difinitions
 – '()
 – (cons File.v1 Dir.v1)
 – (cons Dir.v1 Dir.v1)
 A File.v1 is a String.
 constants
  The first three lines of this file were inserted by  . They record metadata
#reader(lib "htdp-intermediate-lambda-reader.ss" "lang")((modname ex330-model1-TS) (read-case-sensitive #t) (teachpacks ()) (htdp-settings #(#t constructor repeating-decimal #f #t none #f () #f)))
  A Dir.v1 ( short for directory ) is one of :
 


(define TS '("read!"
             ("part1" "part2" "part3")
             (("hang" "draw")
              ("read!"))))