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 |
431 |
MOM_CALC_VISC |
viscA4_D(i,j)=MAX(viscA4_DMin(i,j),Alin) |
./pkg/mom_common/mom_calc_visc.F |
433 |
MOM_CALC_VISC |
viscA4_D(i,j)=MIN(viscA4_DMax(i,j),viscA4_D(i,j)) |
./pkg/mom_common/mom_calc_visc.F |
548 |
MOM_CALC_VISC |
viscA4_W(i,j,k+1,bi,bj) = halfRL*viscA4_D(i,j) |
./pkg/mom_common/mom_calc_visc.F |
560 |
MOM_CALC_VISC |
viscA4_W(i,j,k,bi,bj) = shiftA4 + viscA4_D(i,j) |
./pkg/mom_common/mom_calc_visc.F |
570 |
MOM_CALC_VISC |
& + halfRL*viscA4_D(i,j) |
./pkg/mom_common/mom_calc_visc.F |
594 |
MOM_CALC_VISC |
CALL DIAGNOSTICS_FILL(viscA4_D,'VISCA4D ',k,1,2,bi,bj,myThid) |
./pkg/mom_common/mom_calc_visc.F |
95 |
MOM_CALC_VISC |
_RL viscA4_D(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
./pkg/mom_fluxform/mom_fluxform.F |
147 |
MOM_FLUXFORM |
_RL viscA4_D(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
./pkg/mom_fluxform/mom_fluxform.F |
393 |
MOM_FLUXFORM |
viscA4_D(i,j) = viscA4D |
./pkg/mom_fluxform/mom_fluxform.F |
399 |
MOM_FLUXFORM |
O viscAh_Z, viscAh_D, viscA4_Z, viscA4_D, |
./pkg/mom_fluxform/mom_fluxform.F |
520 |
MOM_FLUXFORM |
I viscAh_D,viscA4_D,myThid ) |
./pkg/mom_fluxform/mom_fluxform.F |
756 |
MOM_FLUXFORM |
I viscAh_D,viscA4_D,myThid ) |
./pkg/mom_fluxform/mom_u_xviscflux.F |
14 |
MOM_U_XVISCFLUX |
I viscAh_D,viscA4_D, |
./pkg/mom_fluxform/mom_u_xviscflux.F |
41 |
MOM_U_XVISCFLUX |
_RL viscA4_D(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
./pkg/mom_fluxform/mom_u_xviscflux.F |
61 |
MOM_U_XVISCFLUX |
& +viscA4_D(i,j)*(del2u(i+1,j)-del2u(i,j)) |
./pkg/mom_fluxform/mom_v_yviscflux.F |
14 |
MOM_V_YVISCFLUX |
I viscAh_D,viscA4_D, |
./pkg/mom_fluxform/mom_v_yviscflux.F |
41 |
MOM_V_YVISCFLUX |
_RL viscA4_D(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
./pkg/mom_fluxform/mom_v_yviscflux.F |
63 |
MOM_V_YVISCFLUX |
& +viscA4_D(i,j)*(del2v(i,j+1)-del2v(i,j)) |
./pkg/mom_vecinv/mom_vecinv.F |
120 |
MOM_VECINV |
_RL viscA4_D(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
./pkg/mom_vecinv/mom_vecinv.F |
363 |
MOM_VECINV |
viscA4_D(i,j) = viscA4D |
./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_vi_hdissip.F |
148 |
MOM_VI_HDISSIP |
Dij=Dij*viscA4_D(i,j) |
./pkg/mom_vecinv/mom_vi_hdissip.F |
149 |
MOM_VI_HDISSIP |
Dim=Dim*viscA4_D(i,j-1) |
./pkg/mom_vecinv/mom_vi_hdissip.F |
150 |
MOM_VI_HDISSIP |
Dmj=Dmj*viscA4_D(i-1,j) |
./pkg/mom_vecinv/mom_vi_hdissip.F |
35 |
MOM_VI_HDISSIP |
_RL viscA4_D(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, |