let
remove_n ra n =
if
n > length ra
||
n < 0
then
invalid_arg
"remove_n"
else
unsafe_remove_n ra n