| File |
Line number |
Procedure |
Code |
|
./pkg/mom_common/mom_calc_visc.F |
16 |
MOM_CALC_VISC |
O viscAh_Z,viscAh_D,viscA4_Z,viscA4_D, |
|
./pkg/mom_common/mom_calc_visc.F |
533 |
MOM_CALC_VISC |
viscA4_Z(i,j)=MAX(viscA4_ZMin(i,j),Alin) |
|
./pkg/mom_common/mom_calc_visc.F |
535 |
MOM_CALC_VISC |
viscA4_Z(i,j)=MIN(viscA4_ZMax(i,j),viscA4_Z(i,j)) |
|
./pkg/mom_common/mom_calc_visc.F |
596 |
MOM_CALC_VISC |
CALL DIAGNOSTICS_FILL(viscA4_Z,'VISCA4Z ',k,1,2,bi,bj,myThid) |
|
./pkg/mom_common/mom_calc_visc.F |
94 |
MOM_CALC_VISC |
_RL viscA4_Z(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/mom_common/mom_u_sidedrag.F |
123 |
MOM_U_SIDEDRAG |
& -viscA4_Z(i,j )*del2u(i,j)*sqcosFacU(j,bi,bj) ) |
|
./pkg/mom_common/mom_u_sidedrag.F |
125 |
MOM_U_SIDEDRAG |
& -viscA4_Z(i,j )*del2u(i,j)*cosFacU(j,bi,bj) ) |
|
./pkg/mom_common/mom_u_sidedrag.F |
129 |
MOM_U_SIDEDRAG |
& -viscA4_Z(i,j )*del2u(i,j) ) |
|
./pkg/mom_common/mom_u_sidedrag.F |
135 |
MOM_U_SIDEDRAG |
& -viscA4_Z(i,j+1)*del2u(i,j)*sqcosFacU(j,bi,bj) ) |
|
./pkg/mom_common/mom_u_sidedrag.F |
137 |
MOM_U_SIDEDRAG |
& -viscA4_Z(i,j+1)*del2u(i,j)*cosFacU(j,bi,bj) ) |
|
./pkg/mom_common/mom_u_sidedrag.F |
13 |
MOM_U_SIDEDRAG |
I viscAh_Z, viscA4_Z, |
|
./pkg/mom_common/mom_u_sidedrag.F |
141 |
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 |
119 |
MOM_V_SIDEDRAG |
& -viscA4_Z(i ,j)*del2v(i,j)*sqcosFacV(j,bi,bj) ) |
|
./pkg/mom_common/mom_v_sidedrag.F |
121 |
MOM_V_SIDEDRAG |
& -viscA4_Z(i ,j)*del2v(i,j)*cosFacV(j,bi,bj) ) |
|
./pkg/mom_common/mom_v_sidedrag.F |
126 |
MOM_V_SIDEDRAG |
& -viscA4_Z(i+1,j)*del2v(i,j)*sqcosFacV(j,bi,bj) ) |
|
./pkg/mom_common/mom_v_sidedrag.F |
128 |
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 |
148 |
MOM_FLUXFORM |
_RL viscA4_Z(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/mom_fluxform/mom_fluxform.F |
394 |
MOM_FLUXFORM |
viscA4_Z(i,j) = viscA4Z |
|
./pkg/mom_fluxform/mom_fluxform.F |
399 |
MOM_FLUXFORM |
O viscAh_Z, viscAh_D, viscA4_Z, viscA4_D, |
|
./pkg/mom_fluxform/mom_fluxform.F |
524 |
MOM_FLUXFORM |
I viscAh_Z,viscA4_Z,myThid ) |
|
./pkg/mom_fluxform/mom_fluxform.F |
566 |
MOM_FLUXFORM |
I viscAh_Z, viscA4_Z, |
|
./pkg/mom_fluxform/mom_fluxform.F |
752 |
MOM_FLUXFORM |
I viscAh_Z,viscA4_Z,myThid ) |
|
./pkg/mom_fluxform/mom_fluxform.F |
798 |
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 |
119 |
MOM_VECINV |
_RL viscA4_Z(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/mom_vecinv/mom_vecinv.F |
364 |
MOM_VECINV |
viscA4_Z(i,j) = viscA4Z |
|
./pkg/mom_vecinv/mom_vecinv.F |
370 |
MOM_VECINV |
O viscAh_Z, viscAh_D, viscA4_Z, viscA4_D, |
|
./pkg/mom_vecinv/mom_vecinv.F |
429 |
MOM_VECINV |
I viscAh_Z, viscAh_D, viscA4_Z, viscA4_D, |
|
./pkg/mom_vecinv/mom_vecinv.F |
437 |
MOM_VECINV |
I viscAh_Z, viscAh_D, viscA4_Z, viscA4_D, |
|
./pkg/mom_vecinv/mom_vecinv.F |
479 |
MOM_VECINV |
I viscAh_Z, viscA4_Z, |
|
./pkg/mom_vecinv/mom_vecinv.F |
550 |
MOM_VECINV |
I viscAh_Z, viscA4_Z, |
|
./pkg/mom_vecinv/mom_vi_hdissip.F |
151 |
MOM_VI_HDISSIP |
Zij=Zij1*viscA4_Z(i,j) |
|
./pkg/mom_vecinv/mom_vi_hdissip.F |
152 |
MOM_VI_HDISSIP |
Zip=Zip1*viscA4_Z(i,j+1) |
|
./pkg/mom_vecinv/mom_vi_hdissip.F |
153 |
MOM_VI_HDISSIP |
Zpj=Zpj1*viscA4_Z(i+1,j) |
|
./pkg/mom_vecinv/mom_vi_hdissip.F |
34 |
MOM_VI_HDISSIP |
_RL viscA4_Z(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/mom_vecinv/mom_vi_hdissip.F |
9 |
MOM_VI_HDISSIP |
I viscAh_Z, viscAh_D, viscA4_Z, viscA4_D, |