程序如何限制最大值

angry · 发表于 2020-12-3 10:32:29

马上注册，结交更多好友，享用更多功能^_^

您需要登录才可以下载或查看，没有账号？立即注册

x

IF(TEMP(1).LT.293) THEN
   STATEV(2)=0.0
   ELSE
   STATEV(2)=1e-9+A*exp(-E/(R*(TEMP(1))))*((1-STATEV(1))**1.554)*
   1(STATEV(1)**0.647)
   STATEV(1)=STATEV(1)+STATEV(2)*DTIME
如何在加上一个条件，使得STATEV(1)在大于1时，STATEV(1) = 1。我改的是下面这样
IF(TEMP(1).LT.293) THEN
   STATEV(2)=0.0
   ELSE IF(STATEV(1).LT.1) THEN
   STATEV(2)=1e-9+A*exp(-E/(R*(TEMP(1))))*((1-STATEV(1))**1.554)*
   1(STATEV(1)**0.647)
   STATEV(1)=STATEV(1)+STATEV(2)*DTIME
   ELSE
STATEV(1)=1

qq1151985918 · 发表于 2020-12-3 11:03:24

then 这是c吧

账号		自动登录	找回密码
密码			立即注册

[技术交流] 程序如何限制最大值

马上注册，结交更多好友，享用更多功能^_^