Rudy's OBTF

Home / Linear algebra / Vector subtraction / Implement

`my-vector-subtract`

(define (my-vector-subtract vector . vectors)
  (if (null? vectors)
      vector
      (my-vector-add vector
                     (my-vector-additive-inverse
                      (apply my-vector-subtract
                             vectors)))))

in terms of my-vector-add.