| File |
Line number |
Procedure |
Code |
|
./pkg/seaice/SEAICE.h |
105 |
NO PROCEDURE |
_RL uIceNm1 (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
|
./pkg/seaice/SEAICE.h |
88 |
NO PROCEDURE |
& uIceNm1, vIceNm1 |
|
./pkg/seaice/lsr.F |
265 |
LSR |
& +AMASS(I,J,bi,bj)/SEAICE_deltaTdyn*uIceNm1(I,J,bi,bj) |
|
./pkg/seaice/seaice_evp.F |
252 |
SEAICE_EVP |
uIceNm1(I,J,bi,bj) = uIce(I,J,bi,bj) |
|
./pkg/seaice/seaice_evp.F |
880 |
SEAICE_EVP |
& * uIceNm1(I,J,bi,bj) |
|
./pkg/seaice/seaice_evp.F |
903 |
SEAICE_EVP |
& + uIceNm1(i,j,bi,bj)*(ONE-locMaskU) |
|
./pkg/seaice/seaice_init_varia.F |
274 |
SEAICE_INIT_VARIA |
uIceNm1(i,j,bi,bj)=0. _d 0 |
|
./pkg/seaice/seaice_jfnk.F |
160 |
SEAICE_JFNK |
& + ( uIce(I,J,bi,bj) - uIceNm1(I,J,bi,bj) ) * bdfFac |
|
./pkg/seaice/seaice_jfnk.F |
163 |
SEAICE_JFNK |
uIceNm1(I,J,bi,bj) = uIce(I,J,bi,bj) |
|
./pkg/seaice/seaice_krylov.F |
160 |
SEAICE_KRYLOV |
& + ( uIce(I,J,bi,bj) - uIceNm1(I,J,bi,bj) ) * bdfFac |
|
./pkg/seaice/seaice_krylov.F |
163 |
SEAICE_KRYLOV |
uIceNm1(I,J,bi,bj) = uIce(I,J,bi,bj) |
|
./pkg/seaice/seaice_lsr.F |
191 |
SEAICE_LSR |
uIceNm1(i,j,bi,bj) = 0. _d 0 |
|
./pkg/seaice/seaice_lsr.F |
277 |
SEAICE_LSR |
uIceNm1(I,J,bi,bj) = uIce(I,J,bi,bj) |
|
./pkg/seaice/seaice_lsr.F |
291 |
SEAICE_LSR |
uIce (I,J,bi,bj)=HALF*(uIce(I,J,bi,bj)+uIceNm1(i,j,bi,bj)) |
|
./pkg/seaice/seaice_lsr.F |
306 |
SEAICE_LSR |
uIceNm1(i,j,bi,bj)=uIce(I,J,bi,bj) |
|
./pkg/seaice/seaice_lsr.F |
424 |
SEAICE_LSR |
& *uIceNm1(i,j,bi,bj) |
|
./pkg/seaice/seaice_lsr.F |
944 |
SEAICE_LSR |
& ( ( (uIceNm1(i,j,bi,bj)+uIceNm1(i+1,j,bi,bj)) |
|
./pkg/seaice/seaice_model.F |
91 |
SEAICE_MODEL |
uIceNm1(i,j,bi,bj) = 0. _d 0 |
|
./pkg/seaice/seaice_read_pickup.F |
264 |
SEAICE_READ_PICKUP |
CALL READ_MFLDS_3D_RL('siUicNm1', uIceNm1, |
|
./pkg/seaice/seaice_write_pickup.F |
165 |
SEAICE_WRITE_PICKUP |
CALL WRITE_REC_3D_RL( fn, fp, 1, uIceNm1 , nj, myIter, myThid ) |