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