| File |
Line number |
Procedure |
Code |
|
./pkg/seaice/seaice_dynsolver.F |
284 |
SEAICE_DYNSOLVER |
vIce(i,j,bi,bj) = vIce_fd(i,j,bi,bj) |
|
./pkg/seaice/seaice_freedrift.F |
180 |
SEAICE_FREEDRIFT |
vIce_fd(i,j,bi,bj)=vIce_fd(i,j,bi,bj)* _maskS(i,j,kSrf,bi,bj) |
|
./pkg/seaice/seaice_lsr.F |
558 |
SEAICE_LSR |
vIce_fd(i,j,bi,bj) = FORCEY(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 |
611 |
SEAICE_LSR |
& + errIni*vIce_fd(i,j,bi,bj) |