Fortran Coder

查看: 99|回复: 1

[求助] Fortran语法错误,这个声明语句位置应该怎么放

[复制链接]

4

帖子

2

主题

0

精华

新人

F 币
23 元
贡献
13 点
发表于 2020-11-16 11:00:59 | 显示全部楼层 |阅读模式
      #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.
求助各位大神,这两个声明语句应该放在什么位置?



回复

使用道具 举报

74

帖子

2

主题

0

精华

专家

F 币
578 元
贡献
271 点

规矩勋章

发表于 2020-11-16 22:08:25 | 显示全部楼层
本帖最后由 风平老涡 于 2020-11-16 23:56 编辑

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

您需要登录后才可以回帖 登录 | 极速注册

本版积分规则

QQ|捐赠本站|Archiver|关于我们 About Us|群聊|Fcode

GMT+8, 2020-12-5 09:59

Powered by Discuz! X3.2

© 2001-2017 Comsenz Inc.

快速回复 返回顶部 返回列表