| File |
Line number |
Procedure |
Code |
|
./pkg/seaice/lsr.F |
421 |
LSR |
dUdx(I,J) = 0.5 _d 0 * ( |
|
./pkg/seaice/lsr.F |
457 |
LSR |
& + ( zetaMinusEta(I ,J ,bi,bj) * dUdx(I ,J ) |
|
./pkg/seaice/lsr.F |
458 |
LSR |
& + zetaMinusEta(I-1,J ,bi,bj) * dUdx(I-1,J ) |
|
./pkg/seaice/lsr.F |
459 |
LSR |
& - zetaMinusEta(I ,J-1,bi,bj) * dUdx(I ,J-1) |
|
./pkg/seaice/lsr.F |
460 |
LSR |
& - zetaMinusEta(I-1,J-1,bi,bj) * dUdx(I-1,J-1) |
|
./pkg/seaice/lsr.F |
80 |
LSR |
_RL dUdx (1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
|
./pkg/seaice/seaice_lsr.F |
1520 |
SEAICE_LSR |
dUdx(I,J) = ( uIceC(I+1,J,bi,bj) - uIceC(I,J,bi,bj) ) |
|
./pkg/seaice/seaice_lsr.F |
1577 |
SEAICE_LSR |
& ( zetaMinusEta(I,J ,bi,bj)*dUdx(I,J ) |
|
./pkg/seaice/seaice_lsr.F |
1578 |
SEAICE_LSR |
& - zetaMinusEta(I,J-1,bi,bj)*dUdx(I,J-1) ) |
|
./pkg/seaice/seaice_lsr.F |
1596 |
SEAICE_LSR |
& * 0.5 _d 0 * ( dUdx(I,J) + dUdx(I,J-1) ) |
|
./pkg/seaice/seaice_lsr.F |
928 |
SEAICE_LSR |
_RL dUdx (1-Olx:sNx+Olx,1-Oly:sNy+Oly) |