| File |
Line number |
Procedure |
Code |
|
./pkg/seaice/SEAICE.h |
104 |
NO PROCEDURE |
_RL FORCEY (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
|
./pkg/seaice/SEAICE.h |
87 |
NO PROCEDURE |
& FORCEX,FORCEY, |
|
./pkg/seaice/dynsolver.F |
156 |
DYNSOLVER |
FORCEY(I,J,bi,bj)=DAIRN(I,J,bi,bj)* |
|
./pkg/seaice/dynsolver.F |
201 |
DYNSOLVER |
FORCEY(I,J,bi,bj)=FORCEY(I,J,bi,bj) |
|
./pkg/seaice/dynsolver.F |
208 |
DYNSOLVER |
FORCEY0(I,J,bi,bj)=FORCEY(I,J,bi,bj) |
|
./pkg/seaice/dynsolver.F |
218 |
DYNSOLVER |
FORCEY(I,J,bi,bj)=FORCEY(I,J,bi,bj) |
|
./pkg/seaice/dynsolver.F |
222 |
DYNSOLVER |
FORCEY0(I,J,bi,bj)=FORCEY(I,J,bi,bj) |
|
./pkg/seaice/lsr.F |
1027 |
LSR |
& +FORCEY(I,J,bi,bj) |
|
./pkg/seaice/lsr.F |
248 |
LSR |
FORCEY(I,J,bi,bj)=FORCEY0(I,J,bi,bj)+DWATN(I,J,bi,bj) |
|
./pkg/seaice/lsr.F |
259 |
LSR |
FORCEY(I,J,bi,bj)=FORCEY(I,J,bi,bj) |
|
./pkg/seaice/lsr.F |
266 |
LSR |
FORCEY(I,J,bi,bj)=FORCEY(I,J,bi,bj) |
|
./pkg/seaice/lsr.F |
269 |
LSR |
FORCEY(I,J,bi,bj)=FORCEY(I,J,bi,bj)*UVM(I,J,bi,bj) |
|
./pkg/seaice/lsr.F |
462 |
LSR |
& +FORCEY(I,J,bi,bj) |
|
./pkg/seaice/seaice_calc_rhs.F |
101 |
SEAICE_CALC_RHS |
vIceRHS(I,J,bi,bj) = FORCEY(I,J,bi,bj) + ( |
|
./pkg/seaice/seaice_evp.F |
793 |
SEAICE_EVP |
FORCEY(I,J,bi,bj)=FORCEY0(I,J,bi,bj)+ |
|
./pkg/seaice/seaice_evp.F |
811 |
SEAICE_EVP |
FORCEY(I,J,bi,bj)=FORCEY(I,J,bi,bj) - 0.5 _d 0*( |
|
./pkg/seaice/seaice_evp.F |
835 |
SEAICE_EVP |
FORCEY(I,J,bi,bj) = FORCEY(I,J,bi,bj) + gVmom(I,J) |
|
./pkg/seaice/seaice_evp.F |
888 |
SEAICE_EVP |
& + FORCEY(I,J,bi,bj) |
|
./pkg/seaice/seaice_init_varia.F |
280 |
SEAICE_INIT_VARIA |
FORCEY(i,j,bi,bj) = 0. _d 0 |
|
./pkg/seaice/seaice_jfnk.F |
176 |
SEAICE_JFNK |
FORCEY(I,J,bi,bj) = FORCEY0(I,J,bi,bj) |
|
./pkg/seaice/seaice_krylov.F |
176 |
SEAICE_KRYLOV |
FORCEY(I,J,bi,bj) = FORCEY0(I,J,bi,bj) |
|
./pkg/seaice/seaice_lsr.F |
391 |
SEAICE_LSR |
FORCEY(I,J,bi,bj)=FORCEY0(I,J,bi,bj)+ |
|
./pkg/seaice/seaice_lsr.F |
412 |
SEAICE_LSR |
FORCEY(I,J,bi,bj) = FORCEY(I,J,bi,bj) - HALF* |
|
./pkg/seaice/seaice_lsr.F |
425 |
SEAICE_LSR |
FORCEY(I,J,bi,bj)=FORCEY(I,J,bi,bj) |
|
./pkg/seaice/seaice_lsr.F |
429 |
SEAICE_LSR |
FORCEY(I,J,bi,bj)=FORCEY(I,J,bi,bj)* seaiceMaskV(I,J,bi,bj) |
|
./pkg/seaice/seaice_lsr.F |
451 |
SEAICE_LSR |
rhsV(I,J,bi,bj) = FORCEY(I,J,bi,bj) |
|
./pkg/seaice/seaice_lsr.F |
558 |
SEAICE_LSR |
vIce_fd(i,j,bi,bj) = FORCEY(i,j,bi,bj) |