关于forall 和 where

wx_G5fH8Rhq

1. forall结构 手册上说是 where结构 的generalization，怎么理解呢？
2. 既然功能有重叠，如何选择呢？个人非常欣赏where的整体操作风格。
3. 似乎只有forall结构被提到跟大型并行计算机有关。但是where结构的masked整体操作同样没有执行顺序，按道理讲也可以安全的并行，为什么没有地方提到呢？

fcode

1. forall 是 where 的一般情况。可以认为是没有mask的情况。
2. 如何选择纯属个人喜好。没什么区别
3. where 也可以自动并行及矢量化。与 forall 是同类的语句。
4. 我从来就把这俩语句当成哥们俩。就像 function 和 subroutine 一样，没有本质区别。

wx_G5fH8Rhq

感谢 fcode 的回复~

jason388

在新的Fortran2015标准中，forall已经被列为obsolescent特性，

The FORALL construct and statement were added to the language in the expectation that they would enable
highly efficient execution, especially on parallel processors. However, experience indicates that they are too
complex and have too many restrictions for compilers to take advantage of them. They are redundant with the
DO CONCURRENT construct, and many of the manipulations for which they might be used can be done more
effectively using pointers, especially using pointer rank remapping.

所以还是不用的好。

wx_G5fH8Rhq

看起来像是编译器原因。。。
哥们儿你这个 标准文档在哪儿整的 我也想看··

wx_G5fH8Rhq

jason388 发表于 2015-8-21 12:18
在新的Fortran2015标准中，forall已经被列为obsolescent特性，

还有 where 没有被列入废弃特性吧？

jason388

wx_G5fH8Rhq 发表于 2015-8-21 17:19
看起来像是编译器原因。。。
哥们儿你这个 标准文档在哪儿整的 我也想看·· ...

http://j3-fortran.org/doc/year/15/15-007r1.pdf

jason388

wx_G5fH8Rhq 发表于 2015-8-21 17:21
还有 where 没有被列入废弃特性吧？

没有where。较新的特性就只有forall命运不好。

chiangtp

蒐集到的參考資料, 有興趣請參考: forall.pdf (254.36 KB, 下载次数: 23)

2017-8-11 15:12 上传

点击文件名下载附件

chiangtp

fcode 发表于 2015-8-20 16:48
1. forall 是 where 的一般情况。可以认为是没有mask的情况。
2. 如何选择纯属个人喜好。没什么区别
3. whe ...

"我从来就把这俩语句当成哥们俩。就像 function 和 subroutine 一样，没有本质区别"
請容我對這個看法表達個人觀點

狹義的數學函數計算, 廣義的 many-in (all arguments) only-one-out (function value)就用FUNCTION, 否則用SUBROUTINE為宜

當然,, Fortran語法上FUNCTION沒有arguments只能"IN"的限制,也就沒有only-one-out的侷限, 也可以這麼說有了FUNCTION, SUBROUTINE可以退出舞台

"IF"含括"CASE"所有功能, 有了"POINTER"則"Allocatable Array"也該走入歷史???
高手中的高手應如是, 我是有幸 有仰慕 只用"GOTO"不用"DO-Loop"的對象 (庖丁解牛)

我資質中等不是高手, 能用"CASE/Allocatable-Array"的話, 我是不會用"IF/POINTER"的