File |
Line number |
Procedure |
Code |
./model/inc/PARAMS.h |
725 |
NO PROCEDURE |
& viscAhD, viscAhZ, viscA4D, viscA4Z, |
./model/inc/PARAMS.h |
807 |
NO PROCEDURE |
_RL viscA4Z |
./pkg/mom_common/mom_calc_visc.F |
194 |
MOM_CALC_VISC |
& .OR.(viscA4Z.NE.0.) |
./pkg/mom_common/mom_calc_visc.F |
266 |
MOM_CALC_VISC |
viscA4_Z(i,j)=viscA4Z |
./pkg/mom_common/mom_calc_visc.F |
587 |
MOM_CALC_VISC |
Alin=viscA4Z+viscA4Grid*L4rdt |
./pkg/mom_common/mom_calc_visc.F |
607 |
MOM_CALC_VISC |
viscA4_Z(i,j)=viscA4Z |
./pkg/mom_vecinv/mom_vi_hdissip.F |
210 |
MOM_VI_HDISSIP |
& - viscA4Z*_recip_hFacW(i,j,k,bi,bj)* |
./pkg/mom_vecinv/mom_vi_hdissip.F |
215 |
MOM_VI_HDISSIP |
vD4 = viscA4Z*_recip_hFacS(i,j,k,bi,bj)* |
./model/src/config_check.F |
280 |
CONFIG_CHECK |
& .OR. viscA4D.NE.0. .OR. viscA4Z.NE.0. ) ) THEN |
./model/src/config_summary.F |
128 |
CONFIG_SUMMARY |
IF ( viscA4Z.NE.viscA4 ) |
./model/src/config_summary.F |
129 |
CONFIG_SUMMARY |
& CALL WRITE_0D_RL( viscA4Z, INDEX_NONE, 'viscA4Z = ', |
./model/src/ini_parms.F |
164 |
INI_PARMS |
& viscAhD, viscAhZ, viscA4D, viscA4Z, |
./model/src/ini_parms.F |
326 |
INI_PARMS |
viscA4Z = UNSET_RL |
./model/src/ini_parms.F |
447 |
INI_PARMS |
IF ( viscA4Z .EQ. UNSET_RL ) viscA4Z = viscA4 |