File |
Line number |
Procedure |
Code |
./pkg/gmredi/gmredi_calc_tensor.F |
1021 |
GMREDI_CALC_TENSOR |
tmp1k(i,j) = ( kapRedi(i,j,k,bi,bj) |
./pkg/gmredi/gmredi_calc_tensor.F |
1023 |
GMREDI_CALC_TENSOR |
tmp1k(i,j) = ( op5*(kapRedi(i,j-1,k,bi,bj) |
./pkg/gmredi/gmredi_calc_tensor.F |
1027 |
GMREDI_CALC_TENSOR |
tmp1k(i,j) = ( GM_isopycK*GM_isoFac1d(k) |
./pkg/gmredi/gmredi_calc_tensor.F |
1055 |
GMREDI_CALC_TENSOR |
tmp1k(i,j) = dxG(i,j,bi,bj)*drF(k) |
./pkg/gmredi/gmredi_calc_tensor.F |
1057 |
GMREDI_CALC_TENSOR |
& * tmp1k(i,j) * dTdz |
./pkg/gmredi/gmredi_calc_tensor.F |
1060 |
GMREDI_CALC_TENSOR |
CALL DIAGNOSTICS_FILL(tmp1k, 'GM_KvzTz', k,1,2,bi,bj,myThid) |
./pkg/gmredi/gmredi_calc_tensor.F |
119 |
GMREDI_CALC_TENSOR |
_RL tmp1k(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
./pkg/gmredi/gmredi_calc_tensor.F |
803 |
GMREDI_CALC_TENSOR |
tmp1k(i,j) = ( kapRedi(i,j,k,bi,bj) |
./pkg/gmredi/gmredi_calc_tensor.F |
805 |
GMREDI_CALC_TENSOR |
tmp1k(i,j) = ( op5*(kapRedi(i-1,j,k,bi,bj) |
./pkg/gmredi/gmredi_calc_tensor.F |
809 |
GMREDI_CALC_TENSOR |
tmp1k(i,j) = ( GM_isopycK*GM_isoFac1d(k) |
./pkg/gmredi/gmredi_calc_tensor.F |
837 |
GMREDI_CALC_TENSOR |
tmp1k(i,j) = dyG(i,j,bi,bj)*drF(k) |
./pkg/gmredi/gmredi_calc_tensor.F |
839 |
GMREDI_CALC_TENSOR |
& * tmp1k(i,j) * dTdz |
./pkg/gmredi/gmredi_calc_tensor.F |
842 |
GMREDI_CALC_TENSOR |
CALL DIAGNOSTICS_FILL(tmp1k, 'GM_KuzTz', k,1,2,bi,bj,myThid) |
./pkg/gmredi/gmredi_xtransport.F |
221 |
GMREDI_XTRANSPORT |
tmp1k(i,j) = dyG(i,j,bi,bj)*( GM_PsiX(i,j,kp1,bi,bj)*maskp1 |
./pkg/gmredi/gmredi_xtransport.F |
227 |
GMREDI_XTRANSPORT |
CALL DIAGNOSTICS_FILL(tmp1k,'GM_ubT ', k,1,2,bi,bj,myThid) |
./pkg/gmredi/gmredi_xtransport.F |
86 |
GMREDI_XTRANSPORT |
_RL tmp1k(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
./pkg/gmredi/gmredi_ytransport.F |
219 |
GMREDI_YTRANSPORT |
tmp1k(i,j) = dxG(i,j,bi,bj)*( GM_PsiY(i,j,kp1,bi,bj)*maskp1 |
./pkg/gmredi/gmredi_ytransport.F |
225 |
GMREDI_YTRANSPORT |
CALL DIAGNOSTICS_FILL(tmp1k,'GM_vbT ', k,1,2,bi,bj,myThid) |
./pkg/gmredi/gmredi_ytransport.F |
85 |
GMREDI_YTRANSPORT |
_RL tmp1k(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
./model/src/diags_oceanic_surf_flux.F |
121 |
DIAGS_OCEANIC_SURF_FLUX |
tmp1k(i,j,bi,bj) = |
./model/src/diags_oceanic_surf_flux.F |
134 |
DIAGS_OCEANIC_SURF_FLUX |
tmp1k(i,j,bi,bj) = tmp1k(i,j,bi,bj) |
./model/src/diags_oceanic_surf_flux.F |
142 |
DIAGS_OCEANIC_SURF_FLUX |
CALL DIAGNOSTICS_FILL( tmp1k,'TFLUX ',0,1,0,1,1,myThid ) |
./model/src/diags_oceanic_surf_flux.F |
145 |
DIAGS_OCEANIC_SURF_FLUX |
CALL LAYERS_FILL( tmp1k, 1, 'SUR', 0,1,0,1,1,myThid ) |
./model/src/diags_oceanic_surf_flux.F |
157 |
DIAGS_OCEANIC_SURF_FLUX |
tmp1k(i,j,bi,bj) = |
./model/src/diags_oceanic_surf_flux.F |
167 |
DIAGS_OCEANIC_SURF_FLUX |
tmp1k(i,j,bi,bj) = tmp1k(i,j,bi,bj) |
./model/src/diags_oceanic_surf_flux.F |
176 |
DIAGS_OCEANIC_SURF_FLUX |
CALL DIAGNOSTICS_FILL( tmp1k,'SFLUX ',0,1,0,1,1,myThid ) |
./model/src/diags_oceanic_surf_flux.F |
179 |
DIAGS_OCEANIC_SURF_FLUX |
CALL LAYERS_FILL( tmp1k, 2, 'SUR', 0,1,0,1,1,myThid ) |
./model/src/diags_oceanic_surf_flux.F |
51 |
DIAGS_OCEANIC_SURF_FLUX |
_RL tmp1k(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
./pkg/diagnostics/diagnostics_fill_state.F |
329 |
DIAGNOSTICS_FILL_STATE |
tmp1k(i,j,bi,bj) = R_low(i,j,bi,bj) |
./pkg/diagnostics/diagnostics_fill_state.F |
335 |
DIAGNOSTICS_FILL_STATE |
tmpMk(i,j,k,bi,bj) = tmp1k(i,j,bi,bj) |
./pkg/diagnostics/diagnostics_fill_state.F |
339 |
DIAGNOSTICS_FILL_STATE |
tmp1k(i,j,bi,bj) = tmp1k(i,j,bi,bj) |
./pkg/diagnostics/diagnostics_fill_state.F |
51 |
DIAGNOSTICS_FILL_STATE |
_RL tmp1k(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
./pkg/diagnostics/diagnostics_fill_state.F |
74 |
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 |
79 |
DIAGNOSTICS_FILL_STATE |
CALL DIAGNOSTICS_FILL(tmp1k,'RSURF ',0,1,0,1,1,myThid) |