| File |
Line number |
Procedure |
Code |
|
./pkg/gmredi/gmredi_calc_tensor.F |
1005 |
GMREDI_CALC_TENSOR |
tmp1k(i,j) = dxG(i,j,bi,bj)*drF(k) |
|
./pkg/gmredi/gmredi_calc_tensor.F |
1007 |
GMREDI_CALC_TENSOR |
& * tmp1k(i,j) * dTdz |
|
./pkg/gmredi/gmredi_calc_tensor.F |
1010 |
GMREDI_CALC_TENSOR |
CALL DIAGNOSTICS_FILL(tmp1k, 'GM_KvzTz', k,1,2,bi,bj,myThid) |
|
./pkg/gmredi/gmredi_calc_tensor.F |
116 |
GMREDI_CALC_TENSOR |
_RL tmp1k(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/gmredi/gmredi_calc_tensor.F |
774 |
GMREDI_CALC_TENSOR |
tmp1k(i,j) = ( kapRedi(i,j,k,bi,bj) |
|
./pkg/gmredi/gmredi_calc_tensor.F |
776 |
GMREDI_CALC_TENSOR |
tmp1k(i,j) = ( GM_isopycK*GM_isoFac1d(k) |
|
./pkg/gmredi/gmredi_calc_tensor.F |
804 |
GMREDI_CALC_TENSOR |
tmp1k(i,j) = dyG(i,j,bi,bj)*drF(k) |
|
./pkg/gmredi/gmredi_calc_tensor.F |
806 |
GMREDI_CALC_TENSOR |
& * tmp1k(i,j) * dTdz |
|
./pkg/gmredi/gmredi_calc_tensor.F |
809 |
GMREDI_CALC_TENSOR |
CALL DIAGNOSTICS_FILL(tmp1k, 'GM_KuzTz', k,1,2,bi,bj,myThid) |
|
./pkg/gmredi/gmredi_calc_tensor.F |
975 |
GMREDI_CALC_TENSOR |
tmp1k(i,j) = ( kapRedi(i,j,k,bi,bj) |
|
./pkg/gmredi/gmredi_calc_tensor.F |
977 |
GMREDI_CALC_TENSOR |
tmp1k(i,j) = ( GM_isopycK*GM_isoFac1d(k) |
|
./pkg/gmredi/gmredi_xtransport.F |
206 |
GMREDI_XTRANSPORT |
tmp1k(i,j) = dyG(i,j,bi,bj)*( GM_PsiX(i,j,kp1,bi,bj)*maskp1 |
|
./pkg/gmredi/gmredi_xtransport.F |
212 |
GMREDI_XTRANSPORT |
CALL DIAGNOSTICS_FILL(tmp1k,'GM_ubT ', k,1,2,bi,bj,myThid) |
|
./pkg/gmredi/gmredi_xtransport.F |
71 |
GMREDI_XTRANSPORT |
_RL tmp1k(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/gmredi/gmredi_ytransport.F |
205 |
GMREDI_YTRANSPORT |
tmp1k(i,j) = dxG(i,j,bi,bj)*( GM_PsiY(i,j,kp1,bi,bj)*maskp1 |
|
./pkg/gmredi/gmredi_ytransport.F |
211 |
GMREDI_YTRANSPORT |
CALL DIAGNOSTICS_FILL(tmp1k,'GM_vbT ', k,1,2,bi,bj,myThid) |
|
./pkg/gmredi/gmredi_ytransport.F |
71 |
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_SURFACE_FLUX( tmp1k, 1, 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_SURFACE_FLUX( tmp1k, 2, 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) |