| File |
Line number |
Procedure |
Code |
|
./pkg/seaice/seaice_init_varia.F |
75 |
SEAICE_INIT_VARIA |
vIceNm1(i,j,bi,bj)=0. _d 0 |
|
./pkg/seaice/seaice_lsr.F |
153 |
SEAICE_LSR |
vIceNm1(i,j,bi,bj)=vIce(I,J,bi,bj) |
|
./pkg/seaice/seaice_lsr.F |
173 |
SEAICE_LSR |
vIce(I,J,bi,bj)=HALF*(vIce(I,J,bi,bj)+vIceNm1(i,j,bi,bj)) |
|
./pkg/seaice/seaice_lsr.F |
188 |
SEAICE_LSR |
vIceNm1(i,j,bi,bj)=vIce(I,J,bi,bj) |
|
./pkg/seaice/seaice_lsr.F |
280 |
SEAICE_LSR |
& *vIceNm1(i,j,bi,bj) |
|
./pkg/seaice/seaice_lsr.F |
949 |
SEAICE_LSR |
& + ( (vIceNm1(i,j,bi,bj)+vIceNm1(i,j+1,bi,bj)) |
|
./pkg/seaice/seaice_model.F |
119 |
SEAICE_MODEL |
vIceNm1(i,j,bi,bj) = 0. _d 0 |