Symbol Description Uses
diffKrBL79Ho depth offset for arctan fn (m) Bryan and Lewis, 1979 10



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