| File |
Line number |
Procedure |
Code |
|
./pkg/seaice/SEAICE.h |
103 |
NO PROCEDURE |
_RL FORCEX (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
|
./pkg/seaice/SEAICE.h |
87 |
NO PROCEDURE |
& FORCEX,FORCEY, |
|
./pkg/seaice/dynsolver.F |
154 |
DYNSOLVER |
FORCEX(I,J,bi,bj)=DAIRN(I,J,bi,bj)* |
|
./pkg/seaice/dynsolver.F |
196 |
DYNSOLVER |
FORCEX(I,J,bi,bj)=FORCEX(I,J,bi,bj) |
|
./pkg/seaice/dynsolver.F |
207 |
DYNSOLVER |
FORCEX0(I,J,bi,bj)=FORCEX(I,J,bi,bj) |
|
./pkg/seaice/dynsolver.F |
216 |
DYNSOLVER |
FORCEX(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/lsr.F |
255 |
LSR |
FORCEX(I,J,bi,bj)=FORCEX(I,J,bi,bj) |
|
./pkg/seaice/lsr.F |
264 |
LSR |
FORCEX(I,J,bi,bj)=FORCEX(I,J,bi,bj) |
|
./pkg/seaice/lsr.F |
268 |
LSR |
FORCEX(I,J,bi,bj)=FORCEX(I,J,bi,bj)*UVM(I,J,bi,bj) |
|
./pkg/seaice/lsr.F |
455 |
LSR |
& +FORCEX(I,J,bi,bj) |
|
./pkg/seaice/lsr.F |
784 |
LSR |
& +FORCEX(I,J,bi,bj) |
|
./pkg/seaice/seaice_calc_rhs.F |
92 |
SEAICE_CALC_RHS |
uIceRHS(I,J,bi,bj) = FORCEX(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_evp.F |
805 |
SEAICE_EVP |
FORCEX(I,J,bi,bj)=FORCEX(I,J,bi,bj) + 0.5 _d 0*( |
|
./pkg/seaice/seaice_evp.F |
834 |
SEAICE_EVP |
FORCEX(I,J,bi,bj) = FORCEX(I,J,bi,bj) + gUmom(I,J) |
|
./pkg/seaice/seaice_evp.F |
881 |
SEAICE_EVP |
& + FORCEX(I,J,bi,bj) |
|
./pkg/seaice/seaice_init_varia.F |
279 |
SEAICE_INIT_VARIA |
FORCEX(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)+ |
|
./pkg/seaice/seaice_lsr.F |
407 |
SEAICE_LSR |
FORCEX(I,J,bi,bj) = FORCEX(I,J,bi,bj) + HALF* |
|
./pkg/seaice/seaice_lsr.F |
422 |
SEAICE_LSR |
FORCEX(I,J,bi,bj)=FORCEX(I,J,bi,bj) |
|
./pkg/seaice/seaice_lsr.F |
428 |
SEAICE_LSR |
FORCEX(I,J,bi,bj)=FORCEX(I,J,bi,bj)* seaiceMaskU(I,J,bi,bj) |
|
./pkg/seaice/seaice_lsr.F |
438 |
SEAICE_LSR |
rhsU(I,J,bi,bj) = FORCEX(I,J,bi,bj) |
|
./pkg/seaice/seaice_lsr.F |
552 |
SEAICE_LSR |
uIce_fd(i,j,bi,bj) = FORCEX(i,j,bi,bj) |