let
iter f ({ ar = ar }
as
ra) =
for
i = 0
to
ra.vlix
do
f (unsafe_get_ar ar i)
done