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

其他内在功能正常。我做错了什么？

Answer 1

问题是你已经用符号{{1}的阴影（覆盖）了符号log的定义 - 这通常是指标准库的数学函数 - }。如果您将程序名称更改为log：

logtest

你会发现该程序按预期工作。