static library for f77 files

[Mike896]

Hi

I build a static library from several *.f files.

After compiling it shows:

Error: If an external or dummy procedure name is used as an actual argument, its interface shall be explicit or it shall be explicitly declared to have the EXTERNAL attribute [DERIVS]

SUBROUTINE RKDUMB(VSTART,NVAR,X1,X2,NSTEP,DERIVS)
PARAMETER (NMAX=10)
COMMON /PATH/ XX(200),Y(10,200)
DIMENSION VSTART(NVAR),V(NMAX),DV(NMAX)
...

DO 13 K=1,NSTEP
CALL DERIVS(X,V,DV)
CALL RK4(V,DV,NVAR,X,H,V,DERIVS)

.....

RETURN
END

Thank you very much

Mike

[Steven_L_Intel1 · Accepted solution]

The compiler is correct in the error message. You should add:

EXTERNAL DERIVS

if you are passing it as a dummy argument. I can believe that older compilers would not detect this error.

[Mike896]

Thank you very much. :)

Mike