| File |
Line number |
Procedure |
Code |
|
./pkg/gmredi/GMREDI.h |
267 |
NO PROCEDURE |
_RL K3D(1-Olx:sNx+Olx,1-Oly:sNy+Oly,1:Nr,nSx,nSy) |
|
./pkg/gmredi/GMREDI.h |
276 |
NO PROCEDURE |
COMMON /GM_K3D/ K3D, modesC, modesW, modesS, Rdef, gradf |
|
./pkg/gmredi/gmredi_calc_tensor.F |
1005 |
GMREDI_CALC_TENSOR |
& +op5*(K3D(i,j,k,bi,bj)+K3D(i,j-1,k,bi,bj))*GM_advect |
|
./pkg/gmredi/gmredi_calc_tensor.F |
1034 |
GMREDI_CALC_TENSOR |
& +op5*(K3D(i,j,k,bi,bj)+K3D(i,j-1,k,bi,bj)) |
|
./pkg/gmredi/gmredi_calc_tensor.F |
558 |
GMREDI_CALC_TENSOR |
& + op5*(K3D(i,j,k,bi,bj)+K3D(i,j,km1,bi,bj)) |
|
./pkg/gmredi/gmredi_calc_tensor.F |
577 |
GMREDI_CALC_TENSOR |
& + op5*(K3D(i,j,k,bi,bj)+K3D(i,j,km1,bi,bj)) |
|
./pkg/gmredi/gmredi_calc_tensor.F |
735 |
GMREDI_CALC_TENSOR |
& +op5*(K3D(i,j,k,bi,bj)+K3D(i-1,j,k,bi,bj)) |
|
./pkg/gmredi/gmredi_calc_tensor.F |
787 |
GMREDI_CALC_TENSOR |
& +op5*(K3D(i,j,k,bi,bj)+K3D(i-1,j,k,bi,bj))*GM_advect |
|
./pkg/gmredi/gmredi_calc_tensor.F |
816 |
GMREDI_CALC_TENSOR |
& +op5*(K3D(i,j,k,bi,bj)+K3D(i-1,j,k,bi,bj)) |
|
./pkg/gmredi/gmredi_calc_tensor.F |
953 |
GMREDI_CALC_TENSOR |
& +op5*(K3D(i,j,k,bi,bj)+K3D(i,j-1,k,bi,bj)) |
|
./pkg/gmredi/gmredi_diagnostics_fill.F |
105 |
GMREDI_DIAGNOSTICS_FILL |
CALL DIAGNOSTICS_FILL(K3D, 'GM_K3D ',0,Nr,0,1,1,myThid) |
|
./pkg/gmredi/gmredi_init_varia.F |
67 |
GMREDI_INIT_VARIA |
K3D(i,j,k,bi,bj) = 0. _d 0 |
|
./pkg/gmredi/gmredi_k3d.F |
1099 |
GMREDI_K3D |
CALL DIAGNOSTICS_FILL(K3D, 'GM_K3D ',0,Nr,1,bi,bj,myThid) |
|
./pkg/gmredi/gmredi_k3d.F |
1143 |
GMREDI_K3D |
K3D(i,j,k,bi,bj) = GM_K3D_constK |
|
./pkg/gmredi/gmredi_k3d.F |
1151 |
GMREDI_K3D |
& CALL DIAGNOSTICS_FILL(K3D, 'GM_K3D_T',0,Nr,1,bi,bj,myThid) |
|
./pkg/gmredi/gmredi_k3d.F |
589 |
GMREDI_K3D |
K3D(i,j,k,bi,bj) = GM_K3D_smallK |
|
./pkg/gmredi/gmredi_k3d.F |
592 |
GMREDI_K3D |
K3D(i,j,k,bi,bj) = GM_K3D_smallK |
|
./pkg/gmredi/gmredi_k3d.F |
597 |
GMREDI_K3D |
K3D(i,j,k,bi,bj) = GM_K3D_gamma*urms(i,j,k) |
|
./pkg/gmredi/gmredi_k3d.F |
602 |
GMREDI_K3D |
K3D(i,j,k,bi,bj) = MIN(K3D(i,j,k,bi,bj),GM_maxK3D) |
|
./pkg/gmredi/gmredi_k3d.F |
603 |
GMREDI_K3D |
K3D(i,j,k,bi,bj) = MAX(K3D(i,j,k,bi,bj),GM_K3D_smallK) |
|
./pkg/gmredi/gmredi_k3d.F |
687 |
GMREDI_K3D |
KPV(i,j,k) = K3D(i,j,k,bi,bj) |
|
./pkg/gmredi/gmredi_k3d.F |
707 |
GMREDI_K3D |
KPV(i,j,k) = K3D(i,j,k,bi,bj) |