began writing fortran, able to access each character in string as part of loop