This is not the appropriate forum for Fortran questions that are unrelated to the Plato Editor/IDE.

The source code fragment that you posted (did you notice that most of it got cut off, because this forum imposes a limit on message size?) is enough to show that the code is written in an obsolete style of Fortran, namely, Fortran-IV. It contains statements that will not survive type and subscript checking. In particular, the seventh actual argument to subroutine PASSIN is a section of a REAL array, whereas the corresponding dummy argument is an INTEGER array.

The code may work if you compile without using any checking options such as /CHECK. You may also need to use options such as /SAVE and /ZERO.

I also consider that if a compiler is backwards compatible it should also be with regard to any checking !
Maybe with suitable extra message sayng exactly what you have said above for example mecej4 would be sufficient to get the user to compile without checking for 'OLDER style code'