I'm trying to run a very simple code that finds machine epsilon with DLAMCH from LAPACK utility function and calls some random subroutine afterward. When I try to run this code, the error I get is:
error #6404: This name does not have a type, and must have an explicit type. [DLAMCH]
PROGRAM Check IMPLICIT NONE !DEC$ NOFREEFORM include 'mkl_lapack.fi' !DEC$ FREEFORM Real*8 eps eps = DLAMCH('E') Call SubTest End Program SUBROUTINE SubTest Write(*,*) 'Test' Return END
However, when I remove all the lines related to the subroutine SubTest, the code can be compiled just fine. Why do I receive this error when calling a subroutine? Any help is appriciated.