RosettaCodeData/Task/Arrays/Fortran/arrays.f