| File |
Line number |
Procedure |
Code |
|
./pkg/seaice/seaice_dynsolver.F |
255 |
SEAICE_DYNSOLVER |
vIce(i,j,bi,bj) = vIce_fd(i,j,bi,bj) |
|
./pkg/seaice/seaice_freedrift.F |
177 |
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 |
476 |
SEAICE_LSR |
vIce_fd(i,j,bi,bj) = FORCEY(i,j,bi,bj) |
|
./pkg/seaice/seaice_lsr.F |
485 |
SEAICE_LSR |
CALL EXCH_UV_XY_RL( uIce_fd, vIce_fd, .TRUE., myThid ) |
|
./pkg/seaice/seaice_lsr.F |
490 |
SEAICE_LSR |
I AU, BU, CU, AV, BV, CV, uIce_fd, vIce_fd, |
|
./pkg/seaice/seaice_lsr.F |
528 |
SEAICE_LSR |
& + errIni*vIce_fd(i,j,bi,bj) |