屏蔽Fortran数组的更好方法? [英] Better way to mask a Fortran array?

问题描述

我想掩盖一个Fortran数组.这是我目前的操作方式...

I am wanting to mask a Fortran array. Here's the way I am currently doing it...

where (my_array <=15.0)
    mask_array = 1
elsewhere
    mask_array = 0
end where

所以我得到了我的蒙版数组:

So then I get my masked array with:

masked = my_array * mask_array

是否有更简洁的方法?

推荐答案

使用MERGE内部函数:

Use the MERGE intrinsic function:

masked = my_array * merge(1,0,my_array<=15.0)

这篇关于屏蔽Fortran数组的更好方法?的文章就介绍到这了，希望我们推荐的答案对大家有所帮助，也希望大家多多支持IT屋！