fortran array reads

Assine o fortran array reads