| File |
Line number |
Procedure |
Code |
|
./pkg/seaice/seaice_calc_strainrates.F |
113 |
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 |
132 |
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 |
150 |
SEAICE_CALC_STRAINRATES |
& - k2AtZ(i,j,bi,bj) * uave(i,j) |
|
./pkg/seaice/seaice_calc_strainrates.F |
155 |
SEAICE_CALC_STRAINRATES |
& 2.0 _d 0 * uave(i,j) * _recip_dyU(i,j,bi,bj) * hFacU |
|
./pkg/seaice/seaice_calc_strainrates.F |
81 |
SEAICE_CALC_STRAINRATES |
_RL uave (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/seaice/seaice_calc_strainrates.F |
99 |
SEAICE_CALC_STRAINRATES |
uave(i,j) = 0.5 _d 0 * (uFld(i,j,bi,bj)+uFld(i+1,j,bi,bj)) |