Fortran Coder

查看: 6856|回复: 2
打印 上一主题 下一主题

[数学库] FORTRAN 编程ASPEN 动力学子程序DyMTBE

[复制链接]

3

帖子

2

主题

0

精华

新人

F 币
26 元
贡献
11 点
跳转到指定楼层
楼主
发表于 2018-5-8 20:04:00 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
[Fortran] 纯文本查看 复制代码
      RATNET=RATE*REALB(1)*1.D-03                                            
      RATES(K_IB)=-RATNET
      RATES(K_MEOH)=-RATNET
      RATES(K_MTBE)=RATNET
      RATES(K_NC4)=0.D+00                                                  

      IF(IDBG.GE.1)THEN
        WRITE(MAXWRT_MAXBUF(1),9030) NSTAGE,RATE,RATNET  
        CALL DMS_WRTTRM(1)    
      ENDIF  
      RETURN  

想问一下各位大神 ,RATNET  什么含义 ?
DMS_WRTTRM(1)代表 什么函数?
MAXWRT_MAXBUF(1)代表 什么文件?

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

835

帖子

2

主题

0

精华

大宗师

F 币
3926 元
贡献
2334 点
沙发
发表于 2018-5-8 21:24:37 | 只看该作者
从语法看,这些都是变量、子程序,具体什么物理意义或功能,得看手册或问作者。

1

帖子

0

主题

0

精华

新人

F 币
14 元
贡献
5 点
板凳
发表于 2018-6-9 20:15:06 | 只看该作者
查看AspenPlusUserModels
您需要登录后才可以回帖 登录 | 极速注册

本版积分规则

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

GMT+8, 2024-11-15 01:22

Powered by Tencent X3.4

© 2013-2024 Tencent

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