| File |
Line number |
Procedure |
Code |
|
./model/src/solve_for_pressure.F |
124 |
SOLVE_FOR_PRESSURE |
sumEmP = 0. |
|
./model/src/solve_for_pressure.F |
159 |
SOLVE_FOR_PRESSURE |
CALL GLOBAL_SUM_TILE_RL( tileEmP, sumEmP, myThid ) |
|
./model/src/solve_for_pressure.F |
167 |
SOLVE_FOR_PRESSURE |
& freeSurfFac*deltaTFreeSurf*mass2rUnit*sumEmP/globalArea |
|
./model/src/solve_for_pressure.F |
63 |
SOLVE_FOR_PRESSURE |
_RL sumEmP, tileEmP(nSx,nSy) |