设为首页收藏本站如何选择编译器？在线F77转F90 繁体浏览

切换到窄版开启辅助访问

Fortran Coder»论坛 › 研讨区 › Fortran语法讨论 › 最近发现的一个问题，一直困扰我，看看没有大神给我解惑 ...

返回列表发新帖

查看: 12038|回复: 4

上一主题

下一主题

[讨论] 最近发现的一个问题，一直困扰我，看看没有大神给我解惑

250 帖子	2 主题	0 精华

F 币: 1730 元
贡献: 872 点

发消息

楼主

发表于 2021-2-6 10:42:21 | 显示全部楼层

if( indt(i,j,k)==1)then
ce(i,j,k)=ce(i,j,k)
else
ce(i,j,k)=dzz
endif

回复支持反对

使用道具举报

返回列表发新帖

捐赠本站|Archiver|关于我们 About Us|小黑屋|Fcode ( 京ICP备18005632-2号 )

GMT+8, 2024-5-9 02:12

Powered by Tencent X3.4

© 2013-2024 Tencent

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