関数変数が宣言されていない場合、gfortranはコンパイルエラーを報告しません

Question

これは私がメインプログラム内に持つFortranの関数です。あなたが見ることができるように、ZLAMSのようないくつかの変数型は先頭に宣言されていません。しかし、gfortran 5.2は何のエラーも報告しません。しかし、このコードを別のモジュールに移動し、メインモジュールでこの関数を呼び出すと、宣言されていないすべての変数がコンパイルエラーを報告します。どうして ？

REAL(kind=sp) FUNCTION ABCTEST (PHIS, LAMS, POLPHI, POLLAM) 
use k_parameters,ONLY:& 
    sp 

REAL(KIND=SP)  LAMS,PHIS,POLPHI,POLLAM 

DATA  ZRPI18 , ZPIR18/57.2957795 , 0.0174532925/

SINPOL = SIN(ZPIR18*POLPHI) 
COSPOL = COS(ZPIR18*POLPHI) 
ZPHIS = ZPIR18*PHIS 
ZLAMS = LAMS 
IF(ZLAMS.GT.180.0) ZLAMS = ZLAMS - 360.0 
ZLAMS = ZPIR18*ZLAMS 
ARG  = COSPOL*COS(ZPHIS)*COS(ZLAMS) + SINPOL*SIN(ZPHIS) 

ABCTEST = ZRPI18*ASIN(ARG) 

RETURN 
END FUNCTION ABCTEST 

Answer 1

あなたは、このようなエラーを取得するには、各コンパイル単位の先頭にIMPLICIT NONEを使用する必要があります。それ以外の場合は、暗黙のタイピング規則が有効です。

最近のFortranでは、IMPLICIT NONE以外の暗黙の文は推奨されていません。現代のすべてのコードで使用する必要があります。

各コンパイル単位は、すべての外部手順、メインプログラム、各モジュールまたはサブモジュールを意味します。モジュールのプロシージャは、ホストの関連付けによるモジュールの暗黙のステートメントを参照します。ホスト・プロシージャの暗黙的な文によって制御される内部プロシージャについても同様です。