File |
Line number |
Procedure |
Code |
./model/src/forcing_surf_relax.F |
173 |
FORCING_SURF_RELAX |
sumTile(bi,bj) = 0. _d 0 |
./model/src/forcing_surf_relax.F |
176 |
FORCING_SURF_RELAX |
sumTile(bi,bj) = sumTile(bi,bj) |
./model/src/forcing_surf_relax.F |
183 |
FORCING_SURF_RELAX |
CALL GLOBAL_SUM_TILE_RL( sumTile, sumGlob, myThid ) |
./model/src/forcing_surf_relax.F |
209 |
FORCING_SURF_RELAX |
sumTile(bi,bj) = 0. _d 0 |
./model/src/forcing_surf_relax.F |
212 |
FORCING_SURF_RELAX |
sumTile(bi,bj) = sumTile(bi,bj) |
./model/src/forcing_surf_relax.F |
219 |
FORCING_SURF_RELAX |
CALL GLOBAL_SUM_TILE_RL( sumTile, sumGlob, myThid ) |
./model/src/forcing_surf_relax.F |
63 |
FORCING_SURF_RELAX |
_RL sumTile(nSx,nSy), sumGlob, globAver |
./model/src/ini_pressure.F |
101 |
INI_PRESSURE |
sumTile = 0. _d 0 |
./model/src/ini_pressure.F |
126 |
INI_PRESSURE |
sumTile = sumTile + maskC(i,j,k,bi,bj) |
./model/src/ini_pressure.F |
132 |
INI_PRESSURE |
count = count + sumTile |
./model/src/ini_pressure.F |
53 |
INI_PRESSURE |
_RL sumTile, rmsTile |