File |
Line number |
Procedure |
Code |
./model/src/config_summary.F |
158 |
CONFIG_SUMMARY |
CALL WRITE_0D_R8( diffKrBL79Ho, INDEX_NONE,'diffKrBL79Ho =', |
./model/src/ini_parms.F |
168 |
INI_PARMS |
& diffKrBL79surf, diffKrBL79deep, diffKrBL79scl, diffKrBL79Ho, |
./model/src/calc_3d_diffusivity.F |
115 |
CALC_3D_DIFFUSIVITY |
& *( atan( -( rF(k)-diffKrBL79Ho )/diffKrBL79scl )/PI+0.5 _d 0) |
./model/src/calc_3d_diffusivity.F |
74 |
CALC_3D_DIFFUSIVITY |
& *( atan( -( rF(k)-diffKrBL79Ho )/diffKrBL79scl )/PI+0.5 _d 0) |
./model/src/calc_3d_diffusivity.F |
93 |
CALC_3D_DIFFUSIVITY |
& *( atan( -( rF(k)-diffKrBL79Ho )/diffKrBL79scl )/PI+0.5 _d 0) |
./model/inc/PARAMS.h |
587 |
NO PROCEDURE |
& diffKrBL79surf, diffKrBL79deep, diffKrBL79scl, diffKrBL79Ho, |
./model/inc/PARAMS.h |
670 |
NO PROCEDURE |
_RL diffKrBL79Ho |
./pkg/ptracers/ptracers_calc_diff.F |
59 |
PTRACERS_CALC_DIFF |
& *( atan( -( rF(k)-diffKrBL79Ho )/diffKrBL79scl )/PI+0.5 _d 0) |
./model/src/calc_diffusivity.F |
60 |
CALC_DIFFUSIVITY |
& *( atan( -( rF(k)-diffKrBL79Ho )/diffKrBL79scl )/PI+0.5 _d 0) |
./model/src/set_defaults.F |
112 |
SET_DEFAULTS |
diffKrBL79Ho = -2000.D0 |