File |
Line number |
Procedure |
Code |
./pkg/exch2/w2_cumulsum_z_tile.F |
20 |
W2_CUMULSUM_Z_TILE_RL |
I dPsiX, dPsiY, myThid ) |
./pkg/exch2/w2_cumulsum_z_tile.F |
53 |
W2_CUMULSUM_Z_TILE_RL |
_RL dPsiX (nSx,nSy) |
./pkg/exch2/w2_cumulsum_z_tile.F |
92 |
W2_CUMULSUM_Z_TILE_RL |
shareBufCS2_R8(1,bi,bj) = dPsiX(bi,bj) |
./eesupp/src/cumulsum_z_tile.F |
20 |
CUMULSUM_Z_TILE_RL |
I dPsiX, dPsiY, myThid ) |
./eesupp/src/cumulsum_z_tile.F |
50 |
CUMULSUM_Z_TILE_RL |
_RL dPsiX (nSx,nSy) |
./eesupp/src/cumulsum_z_tile.F |
76 |
CUMULSUM_Z_TILE_RL |
I dPsiX, dPsiY, myThid ) |
./eesupp/src/cumulsum_z_tile.F |
82 |
CUMULSUM_Z_TILE_RL |
shareBufCS2_R8(1,bi,bj) = dPsiX(bi,bj) |
./pkg/diagnostics/diag_calc_psivel.F |
194 |
DIAG_CALC_PSIVEL |
IF ( jx.NE.0 ) dPsiX (bi,bj) = psiVel(ix,jx,bi,bj) |
./pkg/diagnostics/diag_calc_psivel.F |
233 |
DIAG_CALC_PSIVEL |
dPsiX (bi,bj) = psiVel(1+sNx,1,bi,bj) |
./pkg/diagnostics/diag_calc_psivel.F |
242 |
DIAG_CALC_PSIVEL |
I dPsiX, dPsiY, myThid ) |
./pkg/diagnostics/diag_calc_psivel.F |
66 |
DIAG_CALC_PSIVEL |
_RL dPsiX (nSx,nSy) |
./pkg/diagnostics/diag_calc_psivel.F |
91 |
DIAG_CALC_PSIVEL |
dPsiX (bi,bj) = 0. |