File |
Line number |
Procedure |
Code |
./pkg/mom_common/mom_calc_strain.F |
13 |
MOM_CALC_STRAIN |
O strain, |
./pkg/mom_common/mom_calc_strain.F |
46 |
MOM_CALC_STRAIN |
_RL strain(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
./pkg/mom_common/mom_calc_strain.F |
57 |
MOM_CALC_STRAIN |
strain(i,j)= |
./pkg/mom_common/mom_calc_visc.F |
17 |
MOM_CALC_VISC |
I hDiv,vort3,tension,strain,KE,hFacZ, |
./pkg/mom_common/mom_calc_visc.F |
397 |
MOM_CALC_VISC |
& +0.25 _d 0*(strain(i+1, j )**2+strain( i ,j+1)**2 |
./pkg/mom_common/mom_calc_visc.F |
398 |
MOM_CALC_VISC |
& +strain(i , j )**2+strain(i+1,j+1)**2)) |
./pkg/mom_common/mom_calc_visc.F |
507 |
MOM_CALC_VISC |
& *SQRT(strain(i,j)**2 |
./pkg/mom_common/mom_calc_visc.F |
99 |
MOM_CALC_VISC |
_RL strain(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
./pkg/mom_common/mom_hdissip.F |
29 |
MOM_HDISSIP |
_RL strain (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
./pkg/mom_common/mom_hdissip.F |
61 |
MOM_HDISSIP |
& *viscAh_s(i,j+1)*strain( i ,j+1) |
./pkg/mom_common/mom_hdissip.F |
63 |
MOM_HDISSIP |
& *viscAh_s(i, j )*strain( i , j ) |
./pkg/mom_common/mom_hdissip.F |
71 |
MOM_HDISSIP |
& *viscAh_s(i+1,j)*strain(i+1,j) |
./pkg/mom_common/mom_hdissip.F |
73 |
MOM_HDISSIP |
& *viscAh_s( i ,j)*strain( i ,j) |
./pkg/mom_common/mom_hdissip.F |
8 |
MOM_HDISSIP |
I tension, strain, hFacZ, |
./pkg/mom_fluxform/mom_fluxform.F |
151 |
MOM_FLUXFORM |
_RL strain(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
./pkg/mom_fluxform/mom_fluxform.F |
213 |
MOM_FLUXFORM |
strain(i,j) = 0. |
./pkg/mom_fluxform/mom_fluxform.F |
313 |
MOM_FLUXFORM |
CALL MOM_CALC_STRAIN( bi,bj,k,uFld,vFld,hFacZ,strain,myThid ) |
./pkg/mom_fluxform/mom_fluxform.F |
318 |
MOM_FLUXFORM |
strain(i,j) = sideMaskFac*strain(i,j) |
./pkg/mom_fluxform/mom_fluxform.F |
327 |
MOM_FLUXFORM |
CALL DIAGNOSTICS_FILL(strain, 'Strain ',k,1,2,bi,bj,myThid) |
./pkg/mom_fluxform/mom_fluxform.F |
400 |
MOM_FLUXFORM |
I hDiv, vort3, tension, strain, KE, hFacZ, |
./pkg/mom_vecinv/mom_vecinv.F |
110 |
MOM_VECINV |
_RL strain (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
./pkg/mom_vecinv/mom_vecinv.F |
209 |
MOM_VECINV |
strain(i,j) = 0. _d 0 |
./pkg/mom_vecinv/mom_vecinv.F |
334 |
MOM_VECINV |
CALL MOM_CALC_STRAIN( bi,bj,k,uFld,vFld,hFacZ,strain,myThid ) |
./pkg/mom_vecinv/mom_vecinv.F |
338 |
MOM_VECINV |
strainBC(i,j) = strain(i,j) |
./pkg/mom_vecinv/mom_vecinv.F |
341 |
MOM_VECINV |
strain(i,j) = 0. |
./pkg/mom_vecinv/mom_vecinv.F |
428 |
MOM_VECINV |
I tension, strain, hFacZ, |