Working on fortran stream example