| File |
Line number |
Procedure |
Code |
|
./pkg/mom_common/mom_calc_visc.F |
266 |
MOM_CALC_VISC |
viscA4_Z(i,j)=viscA4Z |
|
./pkg/mom_common/mom_calc_visc.F |
593 |
MOM_CALC_VISC |
viscA4_Z(i,j)=MAX(viscA4_ZMin(i,j),Alin) |
|
./pkg/mom_common/mom_calc_visc.F |
595 |
MOM_CALC_VISC |
viscA4_Z(i,j)=MIN(viscA4_ZMax(i,j),viscA4_Z(i,j)) |
|
./pkg/mom_common/mom_calc_visc.F |
607 |
MOM_CALC_VISC |
viscA4_Z(i,j)=viscA4Z |
|
./pkg/mom_common/mom_calc_visc.F |
619 |
MOM_CALC_VISC |
CALL DIAGNOSTICS_FILL(viscA4_Z,'VISCA4Z ',k,1,2,bi,bj,myThid) |
|
./pkg/mom_common/mom_calc_visc.F |
93 |
MOM_CALC_VISC |
_RL viscA4_Z(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/mom_common/mom_calc_visc.F |
9 |
MOM_CALC_VISC |
O viscAh_Z,viscAh_D,viscA4_Z,viscA4_D, |
|
./pkg/mom_common/mom_u_sidedrag.F |
132 |
MOM_U_SIDEDRAG |
& -viscA4_Z(i,j )*del2u(i,j)*sqcosFacU(j,bi,bj) ) |
|
./pkg/mom_common/mom_u_sidedrag.F |
134 |
MOM_U_SIDEDRAG |
& -viscA4_Z(i,j )*del2u(i,j)*cosFacU(j,bi,bj) ) |
|
./pkg/mom_common/mom_u_sidedrag.F |
138 |
MOM_U_SIDEDRAG |
& -viscA4_Z(i,j )*del2u(i,j) ) |
|
./pkg/mom_common/mom_u_sidedrag.F |
13 |
MOM_U_SIDEDRAG |
I viscAh_Z,viscA4_Z, |
|
./pkg/mom_common/mom_u_sidedrag.F |
144 |
MOM_U_SIDEDRAG |
& -viscA4_Z(i,j+1)*del2u(i,j)*sqcosFacU(j,bi,bj) ) |
|
./pkg/mom_common/mom_u_sidedrag.F |
146 |
MOM_U_SIDEDRAG |
& -viscA4_Z(i,j+1)*del2u(i,j)*cosFacU(j,bi,bj) ) |
|
./pkg/mom_common/mom_u_sidedrag.F |
150 |
MOM_U_SIDEDRAG |
& -viscA4_Z(i,j+1)*del2u(i,j) ) |
|
./pkg/mom_common/mom_u_sidedrag.F |
44 |
MOM_U_SIDEDRAG |
_RL viscA4_Z(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/mom_common/mom_v_sidedrag.F |
128 |
MOM_V_SIDEDRAG |
& -viscA4_Z(i ,j)*del2v(i,j)*sqcosFacV(j,bi,bj) ) |
|
./pkg/mom_common/mom_v_sidedrag.F |
130 |
MOM_V_SIDEDRAG |
& -viscA4_Z(i ,j)*del2v(i,j)*cosFacV(j,bi,bj) ) |
|
./pkg/mom_common/mom_v_sidedrag.F |
135 |
MOM_V_SIDEDRAG |
& -viscA4_Z(i+1,j)*del2v(i,j)*sqcosFacV(j,bi,bj) ) |
|
./pkg/mom_common/mom_v_sidedrag.F |
137 |
MOM_V_SIDEDRAG |
& -viscA4_Z(i+1,j)*del2v(i,j)*cosFacV(j,bi,bj) ) |
|
./pkg/mom_common/mom_v_sidedrag.F |
13 |
MOM_V_SIDEDRAG |
I viscAh_Z,viscA4_Z, |
|
./pkg/mom_common/mom_v_sidedrag.F |
44 |
MOM_V_SIDEDRAG |
_RL viscA4_Z(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/mom_fluxform/mom_fluxform.F |
135 |
MOM_FLUXFORM |
_RL viscA4_Z(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/mom_fluxform/mom_fluxform.F |
365 |
MOM_FLUXFORM |
O viscAh_Z,viscAh_D,viscA4_Z,viscA4_D, |
|
./pkg/mom_fluxform/mom_fluxform.F |
476 |
MOM_FLUXFORM |
I viscAh_Z,viscA4_Z,myThid) |
|
./pkg/mom_fluxform/mom_fluxform.F |
519 |
MOM_FLUXFORM |
I viscAh_Z,viscA4_Z, |
|
./pkg/mom_fluxform/mom_fluxform.F |
687 |
MOM_FLUXFORM |
I viscAh_Z,viscA4_Z,myThid) |
|
./pkg/mom_fluxform/mom_fluxform.F |
734 |
MOM_FLUXFORM |
I viscAh_Z,viscA4_Z, |
|
./pkg/mom_fluxform/mom_u_yviscflux.F |
14 |
MOM_U_YVISCFLUX |
I viscAh_Z,viscA4_Z, |
|
./pkg/mom_fluxform/mom_u_yviscflux.F |
42 |
MOM_U_YVISCFLUX |
_RL viscA4_Z(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/mom_fluxform/mom_u_yviscflux.F |
64 |
MOM_U_YVISCFLUX |
& +viscA4_Z(i,j)*(del2u(i,j)-del2u(i,j-1)) |
|
./pkg/mom_fluxform/mom_v_xviscflux.F |
14 |
MOM_V_XVISCFLUX |
I viscAh_Z,viscA4_Z, |
|
./pkg/mom_fluxform/mom_v_xviscflux.F |
42 |
MOM_V_XVISCFLUX |
_RL viscA4_Z(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/mom_fluxform/mom_v_xviscflux.F |
62 |
MOM_V_XVISCFLUX |
& +viscA4_Z(i,j)*(del2v(i,j)-del2v(i-1,j)) |
|
./pkg/mom_vecinv/mom_vecinv.F |
183 |
MOM_VECINV |
viscA4_Z(i,j) = 0. |
|
./pkg/mom_vecinv/mom_vecinv.F |
263 |
MOM_VECINV |
O viscAh_Z,viscAh_D,viscA4_Z,viscA4_D, |
|
./pkg/mom_vecinv/mom_vecinv.F |
308 |
MOM_VECINV |
I viscAh_Z,viscAh_D,viscA4_Z,viscA4_D, |
|
./pkg/mom_vecinv/mom_vecinv.F |
316 |
MOM_VECINV |
I viscAh_Z,viscAh_D,viscA4_Z,viscA4_D, |
|
./pkg/mom_vecinv/mom_vecinv.F |
361 |
MOM_VECINV |
I viscAh_Z,viscA4_Z, |
|
./pkg/mom_vecinv/mom_vecinv.F |
426 |
MOM_VECINV |
I viscAh_Z,viscA4_Z, |
|
./pkg/mom_vecinv/mom_vecinv.F |
94 |
MOM_VECINV |
_RL viscA4_Z(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/mom_vecinv/mom_vi_hdissip.F |
10 |
MOM_VI_HDISSIP |
I viscAh_Z,viscAh_D,viscA4_Z,viscA4_D, |
|
./pkg/mom_vecinv/mom_vi_hdissip.F |
153 |
MOM_VI_HDISSIP |
Zij=Zij1*viscA4_Z(i,j) |
|
./pkg/mom_vecinv/mom_vi_hdissip.F |
154 |
MOM_VI_HDISSIP |
Zip=Zip1*viscA4_Z(i,j+1) |
|
./pkg/mom_vecinv/mom_vi_hdissip.F |
155 |
MOM_VI_HDISSIP |
Zpj=Zpj1*viscA4_Z(i+1,j) |
|
./pkg/mom_vecinv/mom_vi_hdissip.F |
47 |
MOM_VI_HDISSIP |
_RL viscA4_Z(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |