| File |
Line number |
Procedure |
Code |
|
./pkg/seaice/seaice_init_varia.F |
74 |
SEAICE_INIT_VARIA |
uIceNm1(i,j,bi,bj)=0. _d 0 |
|
./pkg/seaice/seaice_lsr.F |
152 |
SEAICE_LSR |
uIceNm1(i,j,bi,bj)=uIce(I,J,bi,bj) |
|
./pkg/seaice/seaice_lsr.F |
172 |
SEAICE_LSR |
uIce(I,J,bi,bj)=HALF*(uIce(I,J,bi,bj)+uIceNm1(i,j,bi,bj)) |
|
./pkg/seaice/seaice_lsr.F |
187 |
SEAICE_LSR |
uIceNm1(i,j,bi,bj)=uIce(I,J,bi,bj) |
|
./pkg/seaice/seaice_lsr.F |
277 |
SEAICE_LSR |
& *uIceNm1(i,j,bi,bj) |
|
./pkg/seaice/seaice_lsr.F |
947 |
SEAICE_LSR |
& ( ( (uIceNm1(i,j,bi,bj)+uIceNm1(i+1,j,bi,bj)) |
|
./pkg/seaice/seaice_model.F |
118 |
SEAICE_MODEL |
uIceNm1(i,j,bi,bj) = 0. _d 0 |