| File |
Line number |
Procedure |
Code |
|
./pkg/gmredi/gmredi_calc_tensor.F |
110 |
GMREDI_CALC_TENSOR |
_RL tmp1k(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/gmredi/gmredi_calc_tensor.F |
676 |
GMREDI_CALC_TENSOR |
tmp1k(i,j) = ( kapredi(i,j,k,bi,bj) |
|
./pkg/gmredi/gmredi_calc_tensor.F |
678 |
GMREDI_CALC_TENSOR |
tmp1k(i,j) = ( GM_isopycK |
|
./pkg/gmredi/gmredi_calc_tensor.F |
702 |
GMREDI_CALC_TENSOR |
tmp1k(i,j) = dyG(i,j,bi,bj)*drF(k) |
|
./pkg/gmredi/gmredi_calc_tensor.F |
704 |
GMREDI_CALC_TENSOR |
& * tmp1k(i,j) * dTdz |
|
./pkg/gmredi/gmredi_calc_tensor.F |
707 |
GMREDI_CALC_TENSOR |
CALL DIAGNOSTICS_FILL(tmp1k, 'GM_KuzTz', k,1,2,bi,bj,myThid) |
|
./pkg/gmredi/gmredi_calc_tensor.F |
864 |
GMREDI_CALC_TENSOR |
tmp1k(i,j) = ( kapredi(i,j,k,bi,bj) |
|
./pkg/gmredi/gmredi_calc_tensor.F |
866 |
GMREDI_CALC_TENSOR |
tmp1k(i,j) = ( GM_isopycK |
|
./pkg/gmredi/gmredi_calc_tensor.F |
890 |
GMREDI_CALC_TENSOR |
tmp1k(i,j) = dxG(i,j,bi,bj)*drF(k) |
|
./pkg/gmredi/gmredi_calc_tensor.F |
892 |
GMREDI_CALC_TENSOR |
& * tmp1k(i,j) * dTdz |
|
./pkg/gmredi/gmredi_calc_tensor.F |
895 |
GMREDI_CALC_TENSOR |
CALL DIAGNOSTICS_FILL(tmp1k, 'GM_KvzTz', k,1,2,bi,bj,myThid) |
|
./pkg/gmredi/gmredi_xtransport.F |
200 |
GMREDI_XTRANSPORT |
tmp1k(i,j) = dyG(i,j,bi,bj)*( GM_PsiX(i,j,kp1,bi,bj)*maskp1 |
|
./pkg/gmredi/gmredi_xtransport.F |
206 |
GMREDI_XTRANSPORT |
CALL DIAGNOSTICS_FILL(tmp1k,'GM_ubT ', k,1,2,bi,bj,myThid) |
|
./pkg/gmredi/gmredi_xtransport.F |
64 |
GMREDI_XTRANSPORT |
_RL tmp1k(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/gmredi/gmredi_ytransport.F |
199 |
GMREDI_YTRANSPORT |
tmp1k(i,j) = dxG(i,j,bi,bj)*( GM_PsiY(i,j,kp1,bi,bj)*maskp1 |
|
./pkg/gmredi/gmredi_ytransport.F |
205 |
GMREDI_YTRANSPORT |
CALL DIAGNOSTICS_FILL(tmp1k,'GM_vbT ', k,1,2,bi,bj,myThid) |
|
./pkg/gmredi/gmredi_ytransport.F |
64 |
GMREDI_YTRANSPORT |
_RL tmp1k(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./model/src/diags_oceanic_surf_flux.F |
116 |
DIAGS_OCEANIC_SURF_FLUX |
tmp1k(i,j,bi,bj) = |
|
./model/src/diags_oceanic_surf_flux.F |
129 |
DIAGS_OCEANIC_SURF_FLUX |
tmp1k(i,j,bi,bj) = tmp1k(i,j,bi,bj) |
|
./model/src/diags_oceanic_surf_flux.F |
137 |
DIAGS_OCEANIC_SURF_FLUX |
CALL DIAGNOSTICS_FILL( tmp1k,'TFLUX ',0,1,0,1,1,myThid ) |
|
./model/src/diags_oceanic_surf_flux.F |
146 |
DIAGS_OCEANIC_SURF_FLUX |
tmp1k(i,j,bi,bj) = |
|
./model/src/diags_oceanic_surf_flux.F |
156 |
DIAGS_OCEANIC_SURF_FLUX |
tmp1k(i,j,bi,bj) = tmp1k(i,j,bi,bj) |
|
./model/src/diags_oceanic_surf_flux.F |
165 |
DIAGS_OCEANIC_SURF_FLUX |
CALL DIAGNOSTICS_FILL( tmp1k,'SFLUX ',0,1,0,1,1,myThid ) |
|
./model/src/diags_oceanic_surf_flux.F |
49 |
DIAGS_OCEANIC_SURF_FLUX |
_RL tmp1k(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
|
./pkg/diagnostics/diagnostics_fill_state.F |
323 |
DIAGNOSTICS_FILL_STATE |
tmp1k(i,j,bi,bj) = R_low(i,j,bi,bj) |
|
./pkg/diagnostics/diagnostics_fill_state.F |
329 |
DIAGNOSTICS_FILL_STATE |
tmpMk(i,j,k,bi,bj) = tmp1k(i,j,bi,bj) |
|
./pkg/diagnostics/diagnostics_fill_state.F |
333 |
DIAGNOSTICS_FILL_STATE |
tmp1k(i,j,bi,bj) = tmp1k(i,j,bi,bj) |
|
./pkg/diagnostics/diagnostics_fill_state.F |
46 |
DIAGNOSTICS_FILL_STATE |
_RL tmp1k(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
|
./pkg/diagnostics/diagnostics_fill_state.F |
68 |
DIAGNOSTICS_FILL_STATE |
tmp1k(i,j,bi,bj) = Ro_surf(i,j,bi,bj) + etaH(i,j,bi,bj) |
|
./pkg/diagnostics/diagnostics_fill_state.F |
73 |
DIAGNOSTICS_FILL_STATE |
CALL DIAGNOSTICS_FILL(tmp1k,'RSURF ',0,1,0,1,1,myThid) |