let
iteri f v =
for
i = 0
to
v.length - 1
do
f i (unsafe_get v i)
done