| File |
Line number |
Procedure |
Code |
|
./pkg/gmredi/gmredi_calc_tensor.F |
110 |
GMREDI_CALC_TENSOR |
_RL N2loc, SNloc |
|
./pkg/gmredi/gmredi_calc_tensor.F |
386 |
GMREDI_CALC_TENSOR |
N2loc = -gravity*recip_rhoConst*dSigmaR |
|
./pkg/gmredi/gmredi_calc_tensor.F |
388 |
GMREDI_CALC_TENSOR |
IF ( N2loc.GT.0. _d 0 ) THEN |
|
./pkg/gmredi/gmredi_calc_tensor.F |
389 |
GMREDI_CALC_TENSOR |
SNloc = Sloc*SQRT(N2loc) |
|
./pkg/gmredi/gmredi_calc_tensor.F |
482 |
GMREDI_CALC_TENSOR |
N2loc = -gravity*recip_rhoConst*dSigmaDr(i,j) |
|
./pkg/gmredi/gmredi_calc_tensor.F |
483 |
GMREDI_CALC_TENSOR |
SNloc = SQRT(Ssq(i,j)*N2loc ) |
|
./pkg/gmredi/gmredi_k3d.F |
1127 |
GMREDI_K3D |
CALL DIAGNOSTICS_FILL(N2loc, 'GM_N2 ',0,Nr,2,bi,bj,myThid) |
|
./pkg/gmredi/gmredi_k3d.F |
322 |
GMREDI_K3D |
N2loc(i,j,k)=GM_K3D_minN2 |
|
./pkg/gmredi/gmredi_k3d.F |
494 |
GMREDI_K3D |
N2loc(i,j,k) = op5*(N2(i,j,k)+mskp1*N2(i,j,kp1)) |
|
./pkg/gmredi/gmredi_k3d.F |
511 |
GMREDI_K3D |
slopeC(i,j,k) = SQRT(M4loc(i,j,k))/N2loc(i,j,k) |
|
./pkg/gmredi/gmredi_k3d.F |
514 |
GMREDI_K3D |
M4onN2(i,j,k) = M4loc(i,j,k)/N2loc(i,j,k) |
|
./pkg/gmredi/gmredi_k3d.F |
78 |
GMREDI_K3D |
_RL N2loc(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr) |