fortran - 使用插入符号求幂时的语法错误

Question

当我做：

   REAL FUNCTION  f(x)          
      REAL, INTENT(IN) :: x
      f = exp(-x)
    END FUNCTION  f 

它有效，但如果我这样做：

   REAL FUNCTION  f(x)          
      REAL, INTENT(IN) :: x
      f = exp(-x^2)
    END FUNCTION  f 

我收到一个错误：

  Error: Syntax error in argument list at (1)

但我需要的x^2功能不是x. 该怎么办？

Answer 1

用于x ** 2求幂。或者x*x在这种情况下。