; stutter : list -> list twice as long
  (define (stutter the-list)
    (cond [(empty? the-list)     empty ]
          [(cons? the-list)
           ; the-list                   non-empty list 
           ; (first the-list)           whatever type the list elements are 
           ; (rest the-list)            list 
           ; (stutter (rest the-list))  list 
           
           
           ]
          ))
  "Examples of stutter:"
  (stutter empty) "should be" empty
  (stutter (cons "Joe" empty)) "should be" (cons "Joe" (cons "Joe" empty))
  (stutter (cons "Anne" (cons "Bill" empty))) "should be" (cons "Anne" (cons "Anne" (cons "Bill" (cons "Bill" empty))))