fortran - Fortranの自然対数エラー

Question

Fortranの新機能（本日開始したばかり）で、自然対数に問題があります。

PROGRAM log
IMPLICIT NONE
REAL :: x

PRINT *, "Enter a number:"
READ *, x

x = log (x)

PRINT *, "The natural log of x is:", x

END PROGRAM log

コンパイラはエラーをスローし続けます：

x = log (x)
       1
Error: Symbol at (1) is not appropriate for an expression

他の組み込み関数は正常に機能します。私は何が間違っているのですか？

score 9 · Accepted Answer

問題は、シンボルの定義（log通常は標準ライブラリの数学関数を参照します）を、プログラムの名前（これも）でシャドウイング（オーバーライド）したことlogです。プログラムの名前を次のように変更すると、次のようになりますlogtest。

PROGRAM logtest
...
END PROGRAM logtest

プログラムが期待どおりに機能することがわかります。

1 に答える 1