PSCAD编程出错，求帮助!

gagaLi

Fortran编程出错！急求大神帮助，麻烦看看怎么改，源程序和提示都在图里，感谢感谢！
源程序：
      #LOCAL REAL Rline,Xline,Psref,
      REAL PARAMETER : Qsref=($Qsref)
      REAL PARAMETER : Psref=($Psref)
      IF(TIME.LT.0.03)THEN
         $Qsref=0
      END IF
      IF(TIME.GE.0.03)THEN
         IF(($Usarm.LE.$Ea1).AND.($Usarm.GE.$Ea2))THEN
          $Qsref=0
         END IF
         IF(($Usarm.LT.$Ea2).AND.($Usarm.GE.$Ea3))THEN
          $Qsref=($Psref*$Rline-（$DELTU)**2-$Usarm*$DELTU)/$Xline
         END IF
      END IF

watermelon818

这个是Fortran代码么？

li913

real, parameter::

gagaLi

watermelon818 发表于 2020-11-14 14:45
这个是Fortran代码么？

是Fortran代码 这是在PSCAD里边自定义模块编程的代码

gagaLi

li913 发表于 2020-11-14 15:39
real, parameter::

感谢，解决啦

vvt

PSCAD里边自定义模块，严格来说不是标准 Fortran。属于派生出去的“方言”。PSCAD会对它进行“预处理”，得到处理后的Fortran代码，再交给现成的标准Fortran编译器编译。

就好像 PHP/ASP 之于 HTML，Qt 之于 C++ 一样。