| File |
Line number |
Procedure |
Code |
|
./model/src/correction_step.F |
11 |
CORRECTION_STEP |
I K, phiSurfX, phiSurfY, |
|
./model/src/correction_step.F |
40 |
CORRECTION_STEP |
_RL phiSurfX(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./model/src/correction_step.F |
72 |
CORRECTION_STEP |
& -deltaTmom*hxFac*implicSurfPress*phiSurfX(i,j) |
|
./model/src/timestep.F |
11 |
TIMESTEP |
I dPhiHydX,dPhiHydY, phiSurfX, phiSurfY, |
|
./model/src/timestep.F |
276 |
TIMESTEP |
& - psFac*phiSurfX(i,j) |
|
./model/src/timestep.F |
43 |
TIMESTEP |
_RL phiSurfX(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./model/src/calc_grad_phi_surf.F |
11 |
CALC_GRAD_PHI_SURF |
O phiSurfX, phiSurfY, |
|
./model/src/calc_grad_phi_surf.F |
38 |
CALC_GRAD_PHI_SURF |
_RL phiSurfX(1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
|
./model/src/calc_grad_phi_surf.F |
51 |
CALC_GRAD_PHI_SURF |
phiSurfX(i,j)=_recip_dxC(i,j,bi,bj)* |
|
./model/src/momentum_correction_step.F |
100 |
MOMENTUM_CORRECTION_STEP |
I phiSurfX,phiSurfY,myTime,myThid ) |
|
./model/src/momentum_correction_step.F |
59 |
MOMENTUM_CORRECTION_STEP |
_RL phiSurfX(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./model/src/momentum_correction_step.F |
74 |
MOMENTUM_CORRECTION_STEP |
phiSurfX(i,j)=0. |
|
./model/src/momentum_correction_step.F |
90 |
MOMENTUM_CORRECTION_STEP |
O phiSurfX,phiSurfY, |
|
./model/src/dynamics.F |
150 |
DYNAMICS |
_RL phiSurfX(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./model/src/dynamics.F |
281 |
DYNAMICS |
phiSurfX(i,j) = 0. _d 0 |
|
./model/src/dynamics.F |
305 |
DYNAMICS |
O phiSurfX,phiSurfY, |
|
./model/src/dynamics.F |
387 |
DYNAMICS |
I dPhiHydX,dPhiHydY, phiSurfX, phiSurfY, |
|
./model/src/the_correction_step.F |
54 |
THE_CORRECTION_STEP |
_RL phiSurfX(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./model/src/the_correction_step.F |
69 |
THE_CORRECTION_STEP |
phiSurfX(i,j)=0. |
|
./model/src/the_correction_step.F |
85 |
THE_CORRECTION_STEP |
O phiSurfX,phiSurfY, |
|
./model/src/the_correction_step.F |
95 |
THE_CORRECTION_STEP |
I phiSurfX,phiSurfY,myTime,myThid ) |