| File |
Line number |
Procedure |
Code |
|
./pkg/seaice/seaice_dynsolver.F |
283 |
SEAICE_DYNSOLVER |
uIce(i,j,bi,bj) = uIce_fd(i,j,bi,bj) |
|
./pkg/seaice/seaice_freedrift.F |
179 |
SEAICE_FREEDRIFT |
uIce_fd(i,j,bi,bj)=uIce_fd(i,j,bi,bj)* _maskW(i,j,kSrf,bi,bj) |
|
./pkg/seaice/seaice_lsr.F |
552 |
SEAICE_LSR |
uIce_fd(i,j,bi,bj) = FORCEX(i,j,bi,bj) |
|
./pkg/seaice/seaice_lsr.F |
568 |
SEAICE_LSR |
CALL EXCH_UV_XY_RL( uIce_fd, vIce_fd, .TRUE., myThid ) |
|
./pkg/seaice/seaice_lsr.F |
573 |
SEAICE_LSR |
I AU, BU, CU, AV, BV, CV, uIce_fd, vIce_fd, |
|
./pkg/seaice/seaice_lsr.F |
598 |
SEAICE_LSR |
& + errIni*uIce_fd(i,j,bi,bj) |