Fortran中的向量化数组比较 [英] Vectorized array comparison in Fortran
本文介绍了Fortran中的向量化数组比较的处理方法,对大家解决问题具有一定的参考价值,需要的朋友们下面随着小编来一起学习吧!
问题描述
我想使用单行语句在Fortran中执行以下伪代码的 do-end do 位:
I would like to perform the do-end do bit of the following pseudocode within Fortran using a single line statement:
integer, parameter :: N = 1000
integer, dimension(1:N) :: ArrayA, ArrayB
logical, dimension(1:N) :: ArrayL
...
...
do i = 1, N
if( ArrayA(i) <= ArrayB(i) ) then
ArrayL(i) = .true.
else
ArrayL(i) = .false.
end if
end do
这可能吗?如果是这样,我该怎么做?
Is this possible? If so, how do I do so?
推荐答案
integer, parameter :: N = 1000
integer, dimension(1:N) :: ArrayA, ArrayB
logical, dimension(1:N) :: ArrayL
...
...
ArrayL = (ArrayA <= ArrayB)
这篇关于Fortran中的向量化数组比较的文章就介绍到这了,希望我们推荐的答案对大家有所帮助,也希望大家多多支持IT屋!
查看全文