File |
Line number |
Procedure |
Code |
./pkg/seaice/SEAICE.h |
106 |
NO PROCEDURE |
_RL vIceNm1 (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
./pkg/seaice/SEAICE.h |
88 |
NO PROCEDURE |
& uIceNm1, vIceNm1 |
./pkg/seaice/lsr.F |
267 |
LSR |
& +AMASS(I,J,bi,bj)/SEAICE_deltaTdyn*vIceNm1(I,J,bi,bj) |
./pkg/seaice/seaice_evp.F |
253 |
SEAICE_EVP |
vIceNm1(I,J,bi,bj) = vIce(I,J,bi,bj) |
./pkg/seaice/seaice_evp.F |
887 |
SEAICE_EVP |
& * vIceNm1(I,J,bi,bj) |
./pkg/seaice/seaice_evp.F |
905 |
SEAICE_EVP |
& + vIceNm1(i,j,bi,bj)*(ONE-locMaskV) |
./pkg/seaice/seaice_init_varia.F |
275 |
SEAICE_INIT_VARIA |
vIceNm1(i,j,bi,bj)=0. _d 0 |
./pkg/seaice/seaice_jfnk.F |
162 |
SEAICE_JFNK |
& + ( vIce(I,J,bi,bj) - vIceNm1(I,J,bi,bj) ) * bdfFac |
./pkg/seaice/seaice_jfnk.F |
164 |
SEAICE_JFNK |
vIceNm1(I,J,bi,bj) = vIce(I,J,bi,bj) |
./pkg/seaice/seaice_krylov.F |
162 |
SEAICE_KRYLOV |
& + ( vIce(I,J,bi,bj) - vIceNm1(I,J,bi,bj) ) * bdfFac |
./pkg/seaice/seaice_krylov.F |
164 |
SEAICE_KRYLOV |
vIceNm1(I,J,bi,bj) = vIce(I,J,bi,bj) |
./pkg/seaice/seaice_lsr.F |
192 |
SEAICE_LSR |
vIceNm1(i,j,bi,bj) = 0. _d 0 |
./pkg/seaice/seaice_lsr.F |
278 |
SEAICE_LSR |
vIceNm1(I,J,bi,bj) = vIce(I,J,bi,bj) |
./pkg/seaice/seaice_lsr.F |
292 |
SEAICE_LSR |
vIce (I,J,bi,bj)=HALF*(vIce(I,J,bi,bj)+vIceNm1(i,j,bi,bj)) |
./pkg/seaice/seaice_lsr.F |
307 |
SEAICE_LSR |
vIceNm1(i,j,bi,bj)=vIce(I,J,bi,bj) |
./pkg/seaice/seaice_lsr.F |
427 |
SEAICE_LSR |
& *vIceNm1(i,j,bi,bj) |
./pkg/seaice/seaice_lsr.F |
946 |
SEAICE_LSR |
& + ( (vIceNm1(i,j,bi,bj)+vIceNm1(i,j+1,bi,bj)) |
./pkg/seaice/seaice_model.F |
92 |
SEAICE_MODEL |
vIceNm1(i,j,bi,bj) = 0. _d 0 |
./pkg/seaice/seaice_read_pickup.F |
266 |
SEAICE_READ_PICKUP |
CALL READ_MFLDS_3D_RL('siVicNm1', vIceNm1, |
./pkg/seaice/seaice_write_pickup.F |
170 |
SEAICE_WRITE_PICKUP |
CALL WRITE_REC_3D_RL( fn, fp, 1, vIceNm1 , nj, myIter, myThid ) |