| File |
Line number |
Procedure |
Code |
|
./model/inc/PARAMS.h |
731 |
NO PROCEDURE |
& diffKhS, diffK4S, diffKrNrS, |
|
./model/inc/PARAMS.h |
818 |
NO PROCEDURE |
_RL diffKrNrS(Nr) |
|
./model/src/calc_3d_diffusivity.F |
133 |
CALC_3D_DIFFUSIVITY |
& + diffKrNrS(k) |
|
./model/src/calc_3d_diffusivity.F |
193 |
CALC_3D_DIFFUSIVITY |
& - diffKrNrS(k) + PTRACERS_diffKrNr(k,iTr) |
|
./model/src/calc_diffusivity.F |
98 |
CALC_DIFFUSIVITY |
& + diffKrNrS(k) |
|
./model/src/config_summary.F |
167 |
CONFIG_SUMMARY |
CALL WRITE_1D_RL( diffKrNrS, Nr, INDEX_K, 'diffKrNrS =', |
|
./pkg/ptracers/ptracers_readparms.F |
111 |
PTRACERS_READPARMS |
PTRACERS_diffKrNr(k,iTracer)=diffKrNrS(k) |
|
./model/src/ini_mixing.F |
53 |
INI_MIXING |
diffKr(i,j,k,bi,bj) = diffKrNrS(k) |
|
./model/src/ini_parms.F |
191 |
INI_PARMS |
& viscAr, diffKrT, diffKrS, viscArNr, diffKrNrT, diffKrNrS, |
|
./model/src/ini_parms.F |
339 |
INI_PARMS |
diffKrNrS(k) = UNSET_RL |
|
./model/src/ini_parms.F |
509 |
INI_PARMS |
IF ( diffKrNrS(k).EQ.UNSET_RL ) THEN |
|
./model/src/ini_parms.F |
510 |
INI_PARMS |
diffKrNrS(k) = diffKrS |