Fortran Coder

查看: 9545|回复: 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.
求助各位大神,这两个声明语句应该放在什么位置?



分享到:  微信微信
收藏收藏 点赞点赞 点踩点踩

213

帖子

2

主题

0

精华

宗师

F 币
2126 元
贡献
875 点

规矩勋章

沙发
发表于 2020-11-16 22:08:25 | 只看该作者
本帖最后由 风平老涡 于 2020-11-16 23:56 编辑

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

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

本版积分规则

捐赠本站|Archiver|关于我们 About Us|小黑屋|Fcode ( 京ICP备18005632-2号 )

GMT+8, 2024-11-15 02:00

Powered by Tencent X3.4

© 2013-2024 Tencent

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