RosettaCodeData/Task/Apply-a-callback-to-an-array/Scheme/apply-a-callback-to-an-array-1.scm

(define (square n) (* n n))
(define x #(1 2 3 4 5))
(map square (vector->list x))