RosettaCodeData/Task/Arrays/Fortran/arrays-2.f