On 7/27/23 1:36 PM, Allin Cottrell via Fortran wrote:
I have old fortran source code (not my own work) for a specialized
statistical program that I and others find quite useful.
A few years ago I was able to compile it on Linux using gfortran with
std=legacy (and also cross-compile it for Windows an Mac). Now I'd like
to rebuild it, but with recent gfortran (I've tried 12.2.1 on Fedora and
13.1.1 on Arch) it's a no-go. I get lots of errors of the following sort:
ansub9.f:151:44:
151 | INTEGER ITYPE,INIT,LAM,IMEAN,IP,ID,Q,BP,BD,BQ,SQG,MQ,L,M,
| 1
Error: Symbol ‘q’ at (1) already has basic type of REAL
I can understand this complaint. The code contains this sort of thing
within a given subroutine:
IMPLICIT REAL*8 (A-H,O-Z)
Have you considered replacing the above line with IMPLICIT NONE and add
explicit declarations as needed? The code will be safer in the long run.
Regards,
Jerry
