| File |
Line number |
Procedure |
Code |
|
./model/src/do_oceanic_phys.F |
200 |
DO_OCEANIC_PHYS |
Kux(i,j,k,bi,bj) = 0. _d 0 |
|
./pkg/gmredi/gmredi_init.F |
55 |
GMREDI_INIT |
Kux(i,j,k,bi,bj) = 0. _d 0 |
|
./pkg/gmredi/gmredi_xtransport.F |
102 |
GMREDI_XTRANSPORT |
& *Kux(i,j,k,bi,bj) |
|
./pkg/gmredi/gmredi_output.F |
56 |
GMREDI_OUTPUT |
CALL WRITE_FLD_XYZ_RL( 'GM_Kux.',suff,Kux,myIter,myThid) |
|
./pkg/gmredi/GMREDI.h |
71 |
NO PROCEDURE |
_RL Kux(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy) |
|
./pkg/gmredi/GMREDI.h |
73 |
NO PROCEDURE |
COMMON /GM_HorTensor/ Kux,Kvy |
|
./pkg/gmredi/GMREDI.h |
75 |
NO PROCEDURE |
_RL Kux,Kvy |
|
./pkg/gmredi/GMREDI.h |
76 |
NO PROCEDURE |
PARAMETER(Kux=1.,Kvy=1.) |
|
./pkg/gmredi/gmredi_calc_tensor.F |
162 |
GMREDI_CALC_TENSOR |
Kux(i,j,k,bi,bj) = 0. _d 0 |
|
./pkg/gmredi/gmredi_calc_tensor.F |
368 |
GMREDI_CALC_TENSOR |
Kux(i,j,k,bi,bj) = |
|
./pkg/gmredi/gmredi_calc_tensor.F |
384 |
GMREDI_CALC_TENSOR |
Kux(i,j,k,bi,bj) = MAX( Kux(i,j,k,bi,bj), GM_Kmin_horiz ) |
|
./pkg/gmredi/gmredi_calc_tensor.F |
546 |
GMREDI_CALC_TENSOR |
CALL DIAGNOSTICS_FILL(Kux,'GM_Kux ',0,Nr,1,bi,bj,myThid) |