| File |
Line number |
Procedure |
Code |
|
./model/inc/PARAMS.h |
807 |
NO PROCEDURE |
& viscAhD, viscAhZ, viscA4D, viscA4Z, |
|
./model/inc/PARAMS.h |
893 |
NO PROCEDURE |
_RL viscA4Z |
|
./pkg/mom_common/mom_calc_visc.F |
527 |
MOM_CALC_VISC |
Alin=viscA4Z+viscA4Grid*L4rdt |
|
./pkg/mom_fluxform/mom_fluxform.F |
394 |
MOM_FLUXFORM |
viscA4_Z(i,j) = viscA4Z |
|
./pkg/mom_vecinv/mom_vecinv.F |
364 |
MOM_VECINV |
viscA4_Z(i,j) = viscA4Z |
|
./pkg/mom_vecinv/mom_vi_hdissip.F |
219 |
MOM_VI_HDISSIP |
& -_recip_hFacW(i,j,k,bi,bj)*viscA4Z*( Zip-Zij ) |
|
./pkg/mom_vecinv/mom_vi_hdissip.F |
225 |
MOM_VI_HDISSIP |
& _recip_hFacS(i,j,k,bi,bj)*viscA4Z*( Zpj-Zij )*cosFacV(j,bi,bj) |
|
./pkg/mom_vecinv/mom_vi_hdissip.F |
234 |
MOM_VI_HDISSIP |
& - viscA4Z*_recip_hFacW(i,j,k,bi,bj)* |
|
./pkg/mom_vecinv/mom_vi_hdissip.F |
239 |
MOM_VI_HDISSIP |
vD4 = viscA4Z*_recip_hFacS(i,j,k,bi,bj)* |
|
./model/src/config_check.F |
435 |
CONFIG_CHECK |
& .OR. viscA4D.NE.0. .OR. viscA4Z.NE.0. ) ) THEN |
|
./model/src/config_summary.F |
168 |
CONFIG_SUMMARY |
IF ( viscA4Z.NE.viscA4 ) |
|
./model/src/config_summary.F |
169 |
CONFIG_SUMMARY |
& CALL WRITE_0D_RL( viscA4Z, INDEX_NONE, 'viscA4Z = ', |
|
./model/src/ini_parms.F |
191 |
INI_PARMS |
& viscAhD, viscAhZ, viscA4D, viscA4Z, |
|
./model/src/ini_parms.F |
373 |
INI_PARMS |
viscA4Z = UNSET_RL |
|
./model/src/ini_parms.F |
480 |
INI_PARMS |
IF ( viscA4Z .EQ. UNSET_RL ) viscA4Z = viscA4 |
|
./model/src/set_parms.F |
115 |
SET_PARMS |
& .OR. viscA4D .NE.zeroRL .OR. viscA4Z .NE.zeroRL |