Fortran Coder

查看: 390|回复: 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)代表 什么文件?

回复

使用道具 举报

262

帖子

1

主题

0

精华

宗师

F 币
1471 元
贡献
994 点
发表于 2018-5-8 21:24:37 | 显示全部楼层
从语法看,这些都是变量、子程序,具体什么物理意义或功能,得看手册或问作者。

1

帖子

0

主题

0

精华

新人

F 币
14 元
贡献
5 点
发表于 2018-6-9 20:15:06 | 显示全部楼层
查看AspenPlusUserModels
您需要登录后才可以回帖 登录 | 极速注册

本版积分规则

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

GMT+8, 2018-9-26 16:42

Powered by Discuz! X3.2

© 2001-2017 Comsenz Inc.

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