File |
Line number |
Procedure |
Code |
./pkg/seaice/seaice_calc_strainrates.F |
104 |
SEAICE_CALC_STRAINRATES |
uave(i,j) = 0.5 _d 0 * (uFld(i,j,bi,bj)+uFld(i+1,j,bi,bj)) |
./pkg/seaice/seaice_calc_strainrates.F |
118 |
SEAICE_CALC_STRAINRATES |
e22Loc(i,j,bi,bj) = dvdy(i,j) + uave(i,j) * k1AtC(i,j,bi,bj) |
./pkg/seaice/seaice_calc_strainrates.F |
137 |
SEAICE_CALC_STRAINRATES |
uave(i,j) = 0.5 _d 0 * (uFld(i,j,bi,bj)+uFld(i ,j-1,bi,bj)) |
./pkg/seaice/seaice_calc_strainrates.F |
155 |
SEAICE_CALC_STRAINRATES |
& - k2AtZ(i,j,bi,bj) * uave(i,j) |
./pkg/seaice/seaice_calc_strainrates.F |
160 |
SEAICE_CALC_STRAINRATES |
& 2.0 _d 0 * uave(i,j) * _recip_dyU(i,j,bi,bj) * hFacU |
./pkg/seaice/seaice_calc_strainrates.F |
192 |
SEAICE_CALC_STRAINRATES |
& _recip_dyU(i,j,bi,bj) * ( 6.0 _d 0 * uave(i,j) |
./pkg/seaice/seaice_calc_strainrates.F |
86 |
SEAICE_CALC_STRAINRATES |
_RL uave (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |