| File |
Line number |
Procedure |
Code |
|
./pkg/seaice/seaice_lsr.F |
187 |
SEAICE_LSR |
zetaMinusEta(I,J,bi,bj) = ZETA(I,J,bi,bj)-ETA (I,J,bi,bj) |
|
./pkg/seaice/seaice_lsr.F |
282 |
SEAICE_LSR |
& ( zetaMinusEta(I ,J ,bi,bj) * dVdy(I ,J ) |
|
./pkg/seaice/seaice_lsr.F |
283 |
SEAICE_LSR |
& - zetaMinusEta(I-1,J ,bi,bj) * dVdy(I-1,J ) |
|
./pkg/seaice/seaice_lsr.F |
448 |
SEAICE_LSR |
AA5= zetaMinusEta(I,J ,bi,bj) * tanPhiAtU(I,J ,bi,bj) |
|
./pkg/seaice/seaice_lsr.F |
450 |
SEAICE_LSR |
AA6= zetaMinusEta(I,J-1,bi,bj) * tanPhiAtU(I,J-1,bi,bj) |
|
./pkg/seaice/seaice_lsr.F |
505 |
SEAICE_LSR |
& ( zetaMinusEta(I,J ,bi,bj)*dUdx(I,J ) |
|
./pkg/seaice/seaice_lsr.F |
506 |
SEAICE_LSR |
& - zetaMinusEta(I,J-1,bi,bj)*dUdx(I,J-1) ) |
|
./pkg/seaice/seaice_lsr.F |
567 |
SEAICE_LSR |
& + zetaMinusEta(I,J-1,bi,bj) * tanPhiAtU(I,J-1,bi,bj) |
|
./pkg/seaice/seaice_lsr.F |
577 |
SEAICE_LSR |
& - zetaMinusEta(I,J ,bi,bj) * tanPhiAtU(I,J ,bi,bj) |
|
./pkg/seaice/seaice_lsr.F |
64 |
SEAICE_LSR |
_RL zetaMinusEta(1-Olx:sNx+Olx,1-Oly:sNy+Oly,nSx,nSy) |
|
./pkg/seaice/seaice_ocean_stress.F |
100 |
SEAICE_OCEAN_STRESS |
zetaMinusEta(I,J) = zeta(I,J,bi,bj) - eta(I,J,bi,bj) |
|
./pkg/seaice/seaice_ocean_stress.F |
142 |
SEAICE_OCEAN_STRESS |
& ( zetaMinusEta(I ,J ) * dVdy(I ,J ) |
|
./pkg/seaice/seaice_ocean_stress.F |
143 |
SEAICE_OCEAN_STRESS |
& - zetaMinusEta(I-1,J ) * dVdy(I-1,J ) |
|
./pkg/seaice/seaice_ocean_stress.F |
187 |
SEAICE_OCEAN_STRESS |
& zetaMinusEta(I,J ) * tanPhiAtU(I,J ,bi,bj) |
|
./pkg/seaice/seaice_ocean_stress.F |
189 |
SEAICE_OCEAN_STRESS |
& - zetaMinusEta(I,J-1) * tanPhiAtU(I,J-1,bi,bj) |
|
./pkg/seaice/seaice_ocean_stress.F |
200 |
SEAICE_OCEAN_STRESS |
& ( zetaMinusEta(I,J )*dUdx(I,J ) |
|
./pkg/seaice/seaice_ocean_stress.F |
201 |
SEAICE_OCEAN_STRESS |
& - zetaMinusEta(I,J-1)*dUdx(I,J-1) ) |
|
./pkg/seaice/seaice_ocean_stress.F |
47 |
SEAICE_OCEAN_STRESS |
_RL zetaMinusEta(1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
|
./pkg/seaice/lsr.F |
115 |
LSR |
zetaMinusEta(I,J,bi,bj) = ZETA(I,J,bi,bj)-ETA(I,J,bi,bj) |
|
./pkg/seaice/lsr.F |
181 |
LSR |
& + ( zetaMinusEta(I ,J ,bi,bj) * vDiffY(I ,J ) |
|
./pkg/seaice/lsr.F |
182 |
LSR |
& + zetaMinusEta(I ,J-1,bi,bj) * vDiffY(I ,J-1) |
|
./pkg/seaice/lsr.F |
183 |
LSR |
& - zetaMinusEta(I-1,J ,bi,bj) * vDiffY(I-1,J ) |
|
./pkg/seaice/lsr.F |
184 |
LSR |
& - zetaMinusEta(I-1,J-1,bi,bj) * vDiffY(I-1,J-1) |
|
./pkg/seaice/lsr.F |
363 |
LSR |
AA5=(zetaMinusEta(I-1,J ,bi,bj) + zetaMinusEta(I,J ,bi,bj) |
|
./pkg/seaice/lsr.F |
364 |
LSR |
& -zetaMinusEta(I-1,J-1,bi,bj) - zetaMinusEta(I,J-1,bi,bj) |
|
./pkg/seaice/lsr.F |
414 |
LSR |
& *(zetaMinusEta(I-1,J ,bi,bj)+zetaMinusEta(I,J ,bi,bj) |
|
./pkg/seaice/lsr.F |
415 |
LSR |
& -zetaMinusEta(I-1,J-1,bi,bj)-zetaMinusEta(I,J-1,bi,bj)) |
|
./pkg/seaice/lsr.F |
64 |
LSR |
_RL zetaMinusEta(1-Olx:sNx+Olx,1-Oly:sNy+Oly,nSx,nSy) |