make-cirlces.rkt

;here's the main function, it uses 'map' which we define below
(define (make-circles list-of-colors)
  (my-map (lambda (color)
   (circle 12 'solid color))
       list-of-colors
  ))
 
;replacement for built-in 'map' function
(define (my-map f lst)
  (cond
   [(empty? lst) empty]
   [else (cons (f (first lst))
               (my-map f (rest lst)))]))

;handy list of colors so we can do (make-circles colors) instead of writing it out
(define colors
  (list "red" "green" "blue" "yellow")
 )