胶片14:HPF求解拉普拉斯方程的注解 |
![BACKWARD](../../image/backward.gif)
|
- (1) 定义了NTOT个元素的数据空间
- (2) 在一维方向上进行分解,每个处理器所分得的数据元素个数相同
- (3) PHINEW和PHIOLD与数据空间严格对齐.如:PHINEW(I)和PHIOLD(I)存放在数据空间中的第I个位置上
- (4) EOSHIFT是一个"End-Off"移动.本例中对它的两次调用将PHIOLD向左和右移动一个单位
- EOSHIFT及相应的循环移动CSHIFT是Fortran90中标准的数组操作例程,它们并不是专为并行计算而设计的.我们可以将语句4直接写成下列形式
- BEGIN PHINEW(2:NTOT1) = 0.5 * (PHIOLD (1:NTOT2) + PHIOLD (3:NTOT))
- (5) 最终TEST中存放的是任意数据空间位置上变化最大的数的绝对值, MAXVAL是Fortran90的内部函数
- 注意:任何下标表示的n:m是数组的一部分
Copyright: NPACT |
![BACKWARD](../../image/backward.gif)
|