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

切换到窄版开启辅助访问

Fortran Coder»论坛 › 研讨区 › Fortran语法讨论 › fortran中如何使两个if语句同时运行

返回列表发新帖

查看: 634|回复: 2

上一主题

下一主题

[流程控制] fortran中如何使两个if语句同时运行

已解决

5 帖子	3 主题	0 精华

F 币: 27 元
贡献: 13 点

发消息

电梯直达

跳转到指定楼层

楼主

发表于 2024-4-18 14:02:17 | 只看该作者回帖奖励

回帖奖励

|倒序浏览 |阅读模式

if((z>=7.96 .and. z<=8.23) .or. (z>=9.31 .and. z<=9.58)) then

if((z>=11.47 .and. z<=11.74).or. (z>=13 .and. z<=13.27)) then

本主题由 kyra 于 2024-4-29 08:25 添加图章已解决

分享到: 微信

收藏1 点赞0 点踩0

回复

使用道具举报

835 帖子	2 主题	0 精华

F 币: 3926 元
贡献: 2334 点

发消息

沙发

发表于 2024-4-18 14:22:42 | 只看该作者

if((z>=7.96 .and. z<=8.23) .or. (z>=9.31 .and. z<=9.58) .or.(z>=11.47 .and. z<=11.74).or. (z>=13 .and. z<=13.27) ) then

回复支持反对

使用道具举报

实名认证

2022 帖子	12 主题	5 精华

臭石头雪球

F 币: 1598 元
贡献: 689 点

发消息

板凳

发表于 2024-4-18 19:27:29 | 只看该作者

这种方式不够优雅，而且想增加新的区间会比较累。像我这样写，优雅

[Fortran] 纯文本查看 复制代码

real :: a(2,4)
a = reshape([7.96,8.23,9.31,9.58,11.47,11.47,13.,13.27],shape(a))
if( any( z>=a(1,:).and.z<=a(2,:) ) ) then

回复支持反对

使用道具举报

返回列表发新帖

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

GMT+8, 2024-11-23 06:11

Powered by Tencent X3.4

© 2013-2024 Tencent

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