gfortran supports f77, but I'm not sure that this is good f77.
The piece of code is
logical Memb(1) integer*2 Memc(1) integer*2 Mems(1) integer Memi(1) integer Meml(1) real Memr(1) double precision Memd(1) complex Memx(1) equivalence (Memb, Memc, Mems, Memi, Meml, Memr, Memd, Memx) common /Mem/ Memd
Memi are then used to reference the memory location as pointers. The trouble is that f90 sees this as real arrays.
If you have some ideas on how to make this work in gfortran let me know.
On Sat, 1 Jun 2013 22:00:53 +0800, you wrote:
gfortran supports f77, but I'm not sure that this is good f77.
I am just starting to learn fortran, so I'm not much help.
What I would do though is try asking on the gfortran mailing list, where I would hope they would either be able to tell you how to get gfortran to compile it if it is supported, or offer a more modern solution that gfortran does like.
The list (called fortran) can be found here: http://gcc.gnu.org/lists.html
astronomy@lists.fedoraproject.org