How to convert the Fortran code into Mathematica code

I want to convert the Fortran code (given in the link) into Mathematica code https://drive.google.com/drive/u/0/folders/1DoTmvfN2JnlBm9XsEJsJ5Ca02bHEc65d

Is there any direct way to convert it into Mathematica? Can anyone please help me to convert it?

Thanks