Fortran Coder

标题: fortran中如何使两个if语句同时运行 [打印本页]

作者: tsx 时间: 2024-4-18 14:02
标题: fortran中如何使两个if语句同时运行

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

作者: li913 时间: 2024-4-18 14:22

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

作者: fcode 时间: 2024-4-18 19:27
这种方式不够优雅，而且想增加新的区间会比较累。像我这样写，优雅

[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

欢迎光临 Fortran Coder (http://bbs.fcode.cn/)