| 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 |
522 |
MOM_CALC_VISC |
viscAh_Z(i,j)=MAX(viscAh_ZMin(i,j),Alin) |
|
./pkg/mom_common/mom_calc_visc.F |
524 |
MOM_CALC_VISC |
viscAh_Z(i,j)=MIN(viscAh_ZMax(i,j),viscAh_Z(i,j)) |
|
./pkg/mom_common/mom_calc_visc.F |
595 |
MOM_CALC_VISC |
CALL DIAGNOSTICS_FILL(viscAh_Z,'VISCAHZ ',k,1,2,bi,bj,myThid) |
|
./pkg/mom_common/mom_calc_visc.F |
92 |
MOM_CALC_VISC |
_RL viscAh_Z(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/mom_common/mom_u_sidedrag.F |
121 |
MOM_U_SIDEDRAG |
& *( viscAh_Z(i,j )*uFld(i,j)*cosFacU(j,bi,bj) |
|
./pkg/mom_common/mom_u_sidedrag.F |
128 |
MOM_U_SIDEDRAG |
& *( viscAh_Z(i,j )*uFld(i,j) |
|
./pkg/mom_common/mom_u_sidedrag.F |
133 |
MOM_U_SIDEDRAG |
& *( viscAh_Z(i,j+1)*uFld(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 |
140 |
MOM_U_SIDEDRAG |
& *( viscAh_Z(i,j+1)*uFld(i,j) |
|
./pkg/mom_common/mom_u_sidedrag.F |
43 |
MOM_U_SIDEDRAG |
_RL viscAh_Z(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/mom_common/mom_v_sidedrag.F |
117 |
MOM_V_SIDEDRAG |
& *( viscAh_Z(i ,j)*vFld(i,j)*cosFacV(j,bi,bj) |
|
./pkg/mom_common/mom_v_sidedrag.F |
124 |
MOM_V_SIDEDRAG |
& *( viscAh_Z(i+1,j)*vFld(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 |
43 |
MOM_V_SIDEDRAG |
_RL viscAh_Z(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/mom_fluxform/mom_fluxform.F |
146 |
MOM_FLUXFORM |
_RL viscAh_Z(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/mom_fluxform/mom_fluxform.F |
392 |
MOM_FLUXFORM |
viscAh_Z(i,j) = viscAhZ |
|
./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 |
41 |
MOM_U_YVISCFLUX |
_RL viscAh_Z(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/mom_fluxform/mom_u_yviscflux.F |
60 |
MOM_U_YVISCFLUX |
& -viscAh_Z(i,j)*( uFld(i,j)-uFld(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 |
41 |
MOM_V_XVISCFLUX |
_RL viscAh_Z(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/mom_fluxform/mom_v_xviscflux.F |
60 |
MOM_V_XVISCFLUX |
& -viscAh_Z(i,j)*( vFld(i,j)-vFld(i-1,j) ) |
|
./pkg/mom_vecinv/mom_vecinv.F |
117 |
MOM_VECINV |
_RL viscAh_Z(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/mom_vecinv/mom_vecinv.F |
362 |
MOM_VECINV |
viscAh_Z(i,j) = viscAhZ |
|
./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 |
32 |
MOM_VI_HDISSIP |
_RL viscAh_Z(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/mom_vecinv/mom_vi_hdissip.F |
58 |
MOM_VI_HDISSIP |
Zij=hFacZ( i , j )*vort3( i , j )*viscAh_Z(i,j) |
|
./pkg/mom_vecinv/mom_vi_hdissip.F |
59 |
MOM_VI_HDISSIP |
Zip=hFacZ( i ,j+1)*vort3( i ,j+1)*viscAh_Z(i,j+1) |
|
./pkg/mom_vecinv/mom_vi_hdissip.F |
60 |
MOM_VI_HDISSIP |
Zpj=hFacZ(i+1, j )*vort3(i+1, j )*viscAh_Z(i+1,j) |
|
./pkg/mom_vecinv/mom_vi_hdissip.F |
9 |
MOM_VI_HDISSIP |
I viscAh_Z, viscAh_D, viscA4_Z, viscA4_D, |