Fortran Coder

标题: Fortran语法错误，这个声明语句位置应该怎么放 [打印本页]

作者: gagaLi 时间: 2020-11-16 11:00
标题: Fortran语法错误，这个声明语句位置应该怎么放
   #LOCAL REAL Ps,Psref,Usarm,Tm,Tj,Orlim,Or0,s,ws,Ea1,Ea2,Ea3
   REAL ,PARAMETER::Ps
   REAL ,PARAMETER::Psref
   IF(TIME.LT.0.03)THEN
      $Psref=$Ps*(1-$s)
   END IF
   IF(TIME.GE.0.03)THEN
      IF(($Usarm.LE.$Ea1).AND.($Usarm.GE.$Ea2))THEN
         $Psref=$Ps(1-$s)
      END IF
      IF(($Usarm.LE.$Ea2).AND.($Usarm.GE.$Ea3))THEN
         $Psref=$Tm-($Tj*($Orlim-$Or0)/0.625*$ws)
      END IF
   END IF
第二行和第三行报错： Error: A specification statement cannot appear in the executable section.
求助各位大神，这两个声明语句应该放在什么位置？

作者: 风平老涡 时间: 2020-11-16 22:08
本帖最后由风平老涡于 2020-11-16 23:56 编辑

定义的parameter Ps， Psref 不能改变数值。

欢迎光临 Fortran Coder (http://bbs.fcode.cn/)