;; The first three lines of this file were inserted by DrRacket. 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 m09-makeacronym) (read-case-sensitive #t) (teachpacks ()) (htdp-settings #(#t constructor repeating-decimal #f #t none #f () #f))) ;; (make-acronym los) produces a string that is formed by the first characters ;; of the strings contained in los, except empty strings or the words ;; "a", "the", "and", "in", "for", or "of". The string produced should be all ;; uppercase characters. ;; make-acronym: (listof Str) -> Str ;; Examples: (check-expect (make-acronym (list "computer" "science")) "CS") (check-expect (make-acronym (list "University" "of" "Waterloo")) "UW") (define (make-acronym los) ... )