FORTRAN 编程ASPEN 动力学子程序DyMTBE

kasar · 发表于 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)代表什么文件？

li913 · 发表于 2018-5-8 21:24:37

从语法看，这些都是变量、子程序，具体什么物理意义或功能，得看手册或问作者。

马格里斯斯 · 发表于 2018-6-9 20:15:06

查看AspenPlusUserModels

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