| File |
Line number |
Procedure |
Code |
|
./model/src/config_summary.F |
150 |
CONFIG_SUMMARY |
CALL WRITE_1D_R8( diffKrNrS, Nr, INDEX_K,'diffKrNrS =', |
|
./model/src/ini_parms.F |
166 |
INI_PARMS |
& viscAr, diffKrT, diffKrS, diffKrNrT, diffKrNrS, hFacMinDr, |
|
./model/src/ini_parms.F |
337 |
INI_PARMS |
diffKrNrS(k) = UNSET_RL |
|
./model/src/ini_parms.F |
531 |
INI_PARMS |
IF ( diffKrNrS(k).EQ. UNSET_RL ) diffKrSet = .FALSE. |
|
./model/src/ini_parms.F |
535 |
INI_PARMS |
diffKrNrS(k) = diffKrS |
|
./model/src/calc_3d_diffusivity.F |
101 |
CALC_3D_DIFFUSIVITY |
& + diffKrNrS(k) |
|
./model/inc/PARAMS.h |
586 |
NO PROCEDURE |
& diffKhS, diffK4S, diffKrNrS, |
|
./model/inc/PARAMS.h |
665 |
NO PROCEDURE |
_RL diffKrNrS(Nr) |
|
./pkg/ptracers/ptracers_readparms.F |
80 |
PTRACERS_READPARMS |
PTRACERS_diffKrNr(k,iTracer)=diffKrNrS(k) |
|
./pkg/kpp/kpp_calc.F |
779 |
KPP_CALC_DUMMY |
KPPdiffKzS(i,j,k,bi,bj) = diffKrNrS(k) |
|
./pkg/kpp/kpp_routines.F |
213 |
KPPMIX |
diffus(i,k,2) = max ( blmc(i,k,2), diffKrNrS(k) ) |
|
./pkg/kpp/kpp_routines.F |
789 |
RI_IWMIX |
diffus(i,ki,2) = diffKrNrS(ki)+ fcon*difscon + fRi*difs0 |
|
./pkg/kpp/kpp_routines.F |
793 |
RI_IWMIX |
diffus(i,ki,2) = diffKrNrS(ki) |
|
./pkg/kpp/kpp_routines.F |
798 |
RI_IWMIX |
diffus(i,ki,2) = diffKrNrS(ki) |
|
./pkg/kpp/kpp_init.F |
142 |
KPP_INIT |
KPPdiffKzS (i,j,k,bi,bj) = diffKrNrS(k) |
|
./pkg/kpp/kpp_calc_diff_s.F |
58 |
KPP_CALC_DIFF_S |
& - diffKrNrS(k) ) |
|
./pkg/kpp/kpp_calc_diff_s.F |
73 |
KPP_CALC_DIFF_S |
& - diffKrNrS(kArg) ) |
|
./model/src/ini_mixing.F |
45 |
INI_MIXING |
diffKr(i,j,k,bi,bj) = diffKrNrS(k) |
|
./model/src/calc_diffusivity.F |
82 |
CALC_DIFFUSIVITY |
& + diffKrNrS(k) |