File |
Line number |
Procedure |
Code |
./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/correction_step.F |
10 |
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 |
70 |
CORRECTION_STEP |
& -deltaTmom*psFac*phiSurfX(i,j) |
./model/src/dynamics.F |
185 |
DYNAMICS |
_RL phiSurfX(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
./model/src/dynamics.F |
330 |
DYNAMICS |
phiSurfX(i,j) = 0. _d 0 |
./model/src/dynamics.F |
364 |
DYNAMICS |
O phiSurfX,phiSurfY, |
./model/src/dynamics.F |
555 |
DYNAMICS |
I dPhiHydX,dPhiHydY, phiSurfX, phiSurfY, |
./model/src/momentum_correction_step.F |
105 |
MOMENTUM_CORRECTION_STEP |
I phiSurfX,phiSurfY,myTime,myThid ) |
./model/src/momentum_correction_step.F |
66 |
MOMENTUM_CORRECTION_STEP |
_RL phiSurfX(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
./model/src/momentum_correction_step.F |
80 |
MOMENTUM_CORRECTION_STEP |
phiSurfX(i,j)=0. |
./model/src/momentum_correction_step.F |
96 |
MOMENTUM_CORRECTION_STEP |
O phiSurfX,phiSurfY, |
./model/src/timestep.F |
14 |
TIMESTEP |
I dPhiHydX,dPhiHydY, phiSurfX, phiSurfY, |
./model/src/timestep.F |
392 |
TIMESTEP |
& - psFac*phiSurfX(i,j) |
./model/src/timestep.F |
50 |
TIMESTEP |
_RL phiSurfX(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |