---

Implement

In Scheme:

• my-vector-scale

  (define (my-vector-scale vector scalar)
    (map (lambda (component)
           (* scalar
              component))
         vector))