Reverse String Using Pointers In Fortran