梦马论坛-以梦为马,不负韶华

搜索
查看: 2550|回复: 2
收起左侧

aspen使用user subroutine怎么读取反应器的温度

[复制链接]
发表于 2013-5-29 17:02:23 显示全部楼层 |阅读模式
想把ryield反应器的温度使用user subroutine读取出来,不知道怎么弄,谢谢大家了!

 成长值: 72655

发表于 2013-5-29 17:02:23 显示全部楼层
参考这个帖子
Aspen plus  fortran子程序的编译、链接与运行
http://meng.horse/forum.php?mod=viewthread&tid=66932
(出处: 马后炮化工论坛)

点评

还是谢谢,这一步我是会的,我不会的是fortran程序里面怎么读取这个反应器的温度,用什么代码写  详情 回复 发表于 2013-5-30 09:08
回复 支持 反对

使用道具 举报

 楼主| 发表于 2013-5-29 17:02:23 显示全部楼层
tdl522 发表于 2013-5-29 22:03
参考这个帖子
Aspen plus  fortran子程序的编译、链接与运行
http://meng.horse/forum.php?mod=vie ...

还是谢谢,这一步我是会的,我不会的是fortran程序里面怎么读取这个反应器的温度,用什么代码写
回复 支持 反对

使用道具 举报

发表于 2025-9-5 09:56:41 显示全部楼层
啊哈!看来你正在和ASPEN玩捉迷藏,想从RYIELD反应器里"偷"温度数据是吧?让我这个被化工耽误的段子手来帮你搞定这个"间谍任务"!(正经脸:以下是专业解决方案)

首先,让我们用"特工装备"(Fortran)写个用户子程序。就像给反应器装了个温度计+无线发射器:

1. 在你的User Subroutine里(比如USRPROP或USRDIST),先声明这个"特工接头暗号":
   REAL TEMP  ! 这是我们的"温度情报"
   INTEGER IERROR ! 错误代码好比特工对暗号

2. 然后调用ASPEN的"秘密联络API":
   CALL GETPROP('TEMP', 'STREAM', 'REAC-OUT', TEMP, IERROR)
   ! 翻译:呼叫总部('要温度', '从物流', '反应器出口', 存到这里, 错误码)

如果要用反应器内部温度(而不是出口物流),可以试试这个"潜入敌方指挥部"的方法:
   
   CALL GETPROP('TEMP', 'BLOCK', 'RYIELD-1', TEMP, IERROR)
   ! 注意把'RYIELD-1'换成你的反应器模块实际名称

专业提示(假装严肃):
1. 温度单位默认是K(开尔文),想用℃需要自己-273.15
2. 建议先用简单的PRINT*调试输出,确认"情报"准确无误
3. 别忘了在Properties/User Properties里注册你的"特工编号"

最后送你个段子:搞化工模拟就像谈恋爱,有时候ASPEN就是那个"你猜啊"的对象。但有了User Subroutine这个"读心术",妈妈再也不用担心我猜不准反应器温度啦!

(正经补充:具体实现可能因ASPEN版本略有不同,建议查阅对应版本的User Model Manual第12章)   

消除零回复-来自AI Deepseek机器人自动回复

回复内容仅作参考,请甄别回复内容准确与否
回复 支持 反对

使用道具 举报

请勿灌水,请勿发布无意义纯表情或回复
您需要登录后才可以回帖 登录 | 注册

本版积分规则

手机版|Mammoth Forum - Ride on Dreams, Live Up to Youth

GMT+8, 2026-1-13 10:29

Powered by 梦马论坛-以梦为马,不负韶华

© 2024-2099 Meng.Horse

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