File |
Line number |
Procedure |
Code |
./pkg/seaice/SEAICE.h |
130 |
NO PROCEDURE |
& DWATN, PRESS0, FORCEX0, FORCEY0, ZMAX, ZMIN, tensileStrFac |
./pkg/seaice/SEAICE.h |
133 |
NO PROCEDURE |
_RL FORCEX0 (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
./pkg/seaice/dynsolver.F |
207 |
DYNSOLVER |
FORCEX0(I,J,bi,bj)=FORCEX(I,J,bi,bj) |
./pkg/seaice/dynsolver.F |
221 |
DYNSOLVER |
FORCEX0(I,J,bi,bj)=FORCEX(I,J,bi,bj) |
./pkg/seaice/lsr.F |
245 |
LSR |
FORCEX(I,J,bi,bj)=FORCEX0(I,J,bi,bj)+DWATN(I,J,bi,bj) |
./pkg/seaice/seaice_dynsolver.F |
236 |
SEAICE_DYNSOLVER |
FORCEX0(I,J,bi,bj)=TAUX(I,J,bi,bj) |
./pkg/seaice/seaice_dynsolver.F |
245 |
SEAICE_DYNSOLVER |
FORCEX0(I,J,bi,bj)=TAUX(I,J,bi,bj) |
./pkg/seaice/seaice_dynsolver.F |
255 |
SEAICE_DYNSOLVER |
FORCEX0(I,J,bi,bj)=FORCEX0(I,J,bi,bj) |
./pkg/seaice/seaice_evp.F |
782 |
SEAICE_EVP |
FORCEX(I,J,bi,bj)=FORCEX0(I,J,bi,bj)+ |
./pkg/seaice/seaice_freedrift.F |
85 |
SEAICE_FREEDRIFT |
& (FORCEX0(i,j,bi,bj)+FORCEX0(i+1,j,bi,bj)) |
./pkg/seaice/seaice_init_varia.F |
307 |
SEAICE_INIT_VARIA |
FORCEX0(i,j,bi,bj)= 0. _d 0 |
./pkg/seaice/seaice_jfnk.F |
174 |
SEAICE_JFNK |
FORCEX(I,J,bi,bj) = FORCEX0(I,J,bi,bj) |
./pkg/seaice/seaice_krylov.F |
174 |
SEAICE_KRYLOV |
FORCEX(I,J,bi,bj) = FORCEX0(I,J,bi,bj) |
./pkg/seaice/seaice_lsr.F |
380 |
SEAICE_LSR |
FORCEX(I,J,bi,bj)=FORCEX0(I,J,bi,bj)+ |