| File |
Line number |
Procedure |
Code |
|
./pkg/mom_common/mom_calc_visc.F |
265 |
MOM_CALC_VISC |
viscA4_D(i,j)=viscA4D |
|
./pkg/mom_common/mom_calc_visc.F |
461 |
MOM_CALC_VISC |
viscA4_D(i,j)=MAX(viscA4_DMin(i,j),Alin) |
|
./pkg/mom_common/mom_calc_visc.F |
463 |
MOM_CALC_VISC |
viscA4_D(i,j)=MIN(viscA4_DMax(i,j),viscA4_D(i,j)) |
|
./pkg/mom_common/mom_calc_visc.F |
473 |
MOM_CALC_VISC |
viscA4_W(i,j,kp1,bi,bj)=0.5*viscA4_D(i,j) |
|
./pkg/mom_common/mom_calc_visc.F |
477 |
MOM_CALC_VISC |
viscA4_W(i,j,k,bi,bj)=viscA4_D(i,j) |
|
./pkg/mom_common/mom_calc_visc.F |
481 |
MOM_CALC_VISC |
viscA4_W(i,j,k,bi,bj)=viscA4_W(i,j,k,bi,bj)+0.5*viscA4_D(i,j) |
|
./pkg/mom_common/mom_calc_visc.F |
486 |
MOM_CALC_VISC |
viscA4_W(i,j,kp1,bi,bj)=0.5*viscA4_D(i,j) |
|
./pkg/mom_common/mom_calc_visc.F |
490 |
MOM_CALC_VISC |
viscA4_W(i,j,k,bi,bj)=viscA4_W(i,j,k,bi,bj)+0.5*viscA4_D(i,j) |
|
./pkg/mom_common/mom_calc_visc.F |
606 |
MOM_CALC_VISC |
viscA4_D(i,j)=viscA4D |
|
./pkg/mom_common/mom_calc_visc.F |
617 |
MOM_CALC_VISC |
CALL DIAGNOSTICS_FILL(viscA4_D,'VISCA4D ',k,1,2,bi,bj,myThid) |
|
./pkg/mom_common/mom_calc_visc.F |
94 |
MOM_CALC_VISC |
_RL viscA4_D(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_fluxform/mom_fluxform.F |
134 |
MOM_FLUXFORM |
_RL viscA4_D(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 |
472 |
MOM_FLUXFORM |
I viscAh_D,viscA4_D,myThid) |
|
./pkg/mom_fluxform/mom_fluxform.F |
691 |
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 |
184 |
MOM_VECINV |
viscA4_D(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 |
95 |
MOM_VECINV |
_RL viscA4_D(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 |
150 |
MOM_VI_HDISSIP |
Dij=Dij*viscA4_D(i,j) |
|
./pkg/mom_vecinv/mom_vi_hdissip.F |
151 |
MOM_VI_HDISSIP |
Dim=Dim*viscA4_D(i,j-1) |
|
./pkg/mom_vecinv/mom_vi_hdissip.F |
152 |
MOM_VI_HDISSIP |
Dmj=Dmj*viscA4_D(i-1,j) |
|
./pkg/mom_vecinv/mom_vi_hdissip.F |
48 |
MOM_VI_HDISSIP |
_RL viscA4_D(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |