| File |
Line number |
Procedure |
Code |
|
./pkg/gmredi/gmredi_check.F |
45 |
GMREDI_CHECK |
CALL WRITE_0D_R8( GM_isopycK, INDEX_NONE,'GM_isopycK =', |
|
./pkg/gmredi/gmredi_xtransport.F |
104 |
GMREDI_XTRANSPORT |
& *(GM_isopycK |
|
./pkg/gmredi/GMREDI.h |
18 |
NO PROCEDURE |
_RL GM_isopycK |
|
./pkg/gmredi/GMREDI.h |
31 |
NO PROCEDURE |
COMMON /GM_PARAMS/ GM_isopycK, GM_background_K, |
|
./pkg/gmredi/gmredi_readparms.F |
104 |
GMREDI_READPARMS |
IF (GM_isopycK.EQ.-999.) GM_isopycK = GM_background_K |
|
./pkg/gmredi/gmredi_readparms.F |
113 |
GMREDI_READPARMS |
GM_ExtraDiag = GM_Visbeck_alpha.NE.0. .OR. GM_isopycK.NE.0. |
|
./pkg/gmredi/gmredi_readparms.F |
117 |
GMREDI_READPARMS |
GM_ExtraDiag = GM_isopycK.NE.GM_background_K |
|
./pkg/gmredi/gmredi_readparms.F |
32 |
GMREDI_READPARMS |
& GM_isopycK, |
|
./pkg/gmredi/gmredi_readparms.F |
73 |
GMREDI_READPARMS |
GM_isopycK = -999. |
|
./pkg/gmredi/gmredi_calc_tensor.F |
310 |
GMREDI_CALC_TENSOR |
Kgm_tmp = GM_isopycK + GM_skewflx*GM_background_K |
|
./pkg/gmredi/gmredi_calc_tensor.F |
316 |
GMREDI_CALC_TENSOR |
Kwz(i,j,k,bi,bj)= ( GM_isopycK |
|
./pkg/gmredi/gmredi_calc_tensor.F |
369 |
GMREDI_CALC_TENSOR |
& ( GM_isopycK |
|
./pkg/gmredi/gmredi_calc_tensor.F |
399 |
GMREDI_CALC_TENSOR |
& ( GM_isopycK - GM_skewflx*GM_background_K |
|
./pkg/gmredi/gmredi_calc_tensor.F |
450 |
GMREDI_CALC_TENSOR |
& ( GM_isopycK |
|
./pkg/gmredi/gmredi_calc_tensor.F |
480 |
GMREDI_CALC_TENSOR |
& ( GM_isopycK - GM_skewflx*GM_background_K |
|
./pkg/gmredi/gmredi_ytransport.F |
104 |
GMREDI_YTRANSPORT |
& *(GM_isopycK |