24小时热门版块排行榜    

查看: 541  |  回复: 0

chaofan1231

银虫 (小有名气)

[求助] proII计算器fortran语句求助

求教:唐宏青模拟计算手册258页氨合成回路里这个计算器设置里Fortran语句怎么理解?
小弟刚开始学习,望多多指教。
CALC UID=CAL001
DEFINE P(1) AS STRE=S14R,RATE,COMP=1
DEFINE P(2) AS STRE=S14R,RATE,COMP=2
DEFINE P(3) AS STRE=S14R,RATE,COMP=3
DEFINE P(4) AS STRE=S14R,RATE,COMP=4
DEFINE P(5) AS STRE=S14R,RATE,COMP=5
SEQU STRE=S14R
PROCEDURE
IF (R(100).GT.0) GOTO 100
R(1)=P(1) $H2
R(2)=P(2) $N2
R(3)=P(3) $A
R(4)=P(4) $C1
R(5)=P(5) $NH3
R(100)=1
GOTO 200
100 CONTINUE
CALL SRVSTR(SCMR,R(1),S14R,1,5)
200 CONTINUE
RETURN
回复此楼

» 猜你喜欢

已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

智能机器人

Robot (super robot)

我们都爱小木虫

相关版块跳转 我要订阅楼主 chaofan1231 的主题更新
信息提示
请填处理意见