| File |
Line number |
Procedure |
Code |
|
./pkg/gmredi/gmredi_calc_tensor.F |
107 |
GMREDI_CALC_TENSOR |
_RL N2loc, SNloc |
|
./pkg/gmredi/gmredi_calc_tensor.F |
384 |
GMREDI_CALC_TENSOR |
N2loc = -gravity*recip_rhoConst*dSigmaR |
|
./pkg/gmredi/gmredi_calc_tensor.F |
386 |
GMREDI_CALC_TENSOR |
IF ( N2loc.GT.0. _d 0 ) THEN |
|
./pkg/gmredi/gmredi_calc_tensor.F |
387 |
GMREDI_CALC_TENSOR |
SNloc = Sloc*SQRT(N2loc) |
|
./pkg/gmredi/gmredi_calc_tensor.F |
479 |
GMREDI_CALC_TENSOR |
N2loc = -gravity*recip_rhoConst*dSigmaDr(i,j) |
|
./pkg/gmredi/gmredi_calc_tensor.F |
480 |
GMREDI_CALC_TENSOR |
SNloc = SQRT(Ssq(i,j)*N2loc ) |
|
./pkg/gmredi/gmredi_k3d.F |
1120 |
GMREDI_K3D |
CALL DIAGNOSTICS_FILL(N2loc, 'GM_N2 ',0,Nr,0,1,1,myThid) |
|
./pkg/gmredi/gmredi_k3d.F |
339 |
GMREDI_K3D |
N2loc(i,j,k)=GM_K3D_minN2 |
|
./pkg/gmredi/gmredi_k3d.F |
478 |
GMREDI_K3D |
N2loc(i,j,k) = op5*(N2(i,j,k)+N2(i,j,k+1)) |
|
./pkg/gmredi/gmredi_k3d.F |
480 |
GMREDI_K3D |
N2loc(i,j,k) = op5*N2(i,j,k) |
|
./pkg/gmredi/gmredi_k3d.F |
498 |
GMREDI_K3D |
slopeC(i,j,k) = SQRT(M4loc(i,j,k))/N2loc(i,j,k) |
|
./pkg/gmredi/gmredi_k3d.F |
501 |
GMREDI_K3D |
M4onN2(i,j,k) = M4loc(i,j,k)/N2loc(i,j,k) |
|
./pkg/gmredi/gmredi_k3d.F |
77 |
GMREDI_K3D |
_RL N2loc(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr) |