Ex 2
Part A
(step (map triangle (list 30 10 20)))
(step (map text-join (list “ant” “bear” “ox”)))
↪ (step (map text-join (list “ant” “bear” “ox”)))
○ (map text-join (list “ant” “bear” “ox”))
• (list (text-join “ant”) (text-join “bear”) (text-join “ox”))
• (list “ant” “bear” “ox”)
↪
(step (map list? (list “ant” list #false – 25)))
↪ (step (map list? (list “ant” list #false – 25)))
○ (map list? (list “ant” list #false – 25))
• (list (list? “ant”) (list? list) (list? #false) (list? -) (list? 25))
• (list #false #false #false #false #false)
↪
(step (map binary? (list list? list length)))
↪ (step (map binary? (list list? list length)))
○ (map binary? (list list? list length))
• (list (binary? list?) (binary? list) (binary? length))
• (list #false #true #false)
(step (map – (map text-length (list “ant” “bear” “ox”))))
↪ (step (map – (map text-length (list “ant” “bear” “ox”))))
○ (map – (map text-length (list “ant” “bear” “ox”))) • (map – (list (text-length “ant”) (text-length “bear”) (text-length “ox”)))
• (map – (list 3 4 2))
• (list (- 3) (- 4) (- 2))
• (list -3 -4 -2)
(step (map clockwise (map text->image (list “ant” “bear” “ox”))))
↪ (step (map clockwise (map text->image (list “ant” “bear” “ox”))))
○ (map clockwise (map text->image (list “ant” “bear” “ox”)))
• (map clockwise (list (text->image “ant”) (text->image “bear”) (text->image “ox”)))
• (map clockwise (list . . .)) • (list (clockwise .) (clockwise .) (clockwise .))
(step (map + (map width (map wide (map solid-circle (list 30 10 20))))))
Part B