let set ra n =
    if n > ra.vlix || n < 0 then invalid_arg "set" else unsafe_set ra n