| File |
Line number |
Procedure |
Code |
|
./pkg/seaice/seaice_evp.F |
368 |
SEAICE_EVP |
sig11(I,J) = 0.5 _d 0 * |
|
./pkg/seaice/seaice_evp.F |
390 |
SEAICE_EVP |
& ( sig11(I ,J ) * _dyF(I ,J,bi,bj) |
|
./pkg/seaice/seaice_evp.F |
391 |
SEAICE_EVP |
& - sig11(I-1,J ) * _dyF(I-1,J,bi,bj) |
|
./pkg/seaice/seaice_evp.F |
79 |
SEAICE_EVP |
_RL sig11 (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/seaice/seaice_lsr.F |
438 |
SEAICE_LSR |
sig11(I,J) = zetaMinusEta(I,J,bi,bj) |
|
./pkg/seaice/seaice_lsr.F |
479 |
SEAICE_LSR |
& ( _dyF(I ,J ,bi,bj)*sig11(I ,J ) |
|
./pkg/seaice/seaice_lsr.F |
480 |
SEAICE_LSR |
& - _dyF(I-1,J ,bi,bj)*sig11(I-1,J ) |
|
./pkg/seaice/seaice_lsr.F |
892 |
SEAICE_LSR |
sig11(I,J) = 0. _d 0 |
|
./pkg/seaice/seaice_lsr.F |
902 |
SEAICE_LSR |
sig11(I,J) = zeta(I,J,bi,bj)*eplus + eta(I,J,bi,bj)*eminus |
|
./pkg/seaice/seaice_lsr.F |
918 |
SEAICE_LSR |
& ( sig11(I ,J ) * _dyF(I ,J ,bi,bj) |
|
./pkg/seaice/seaice_lsr.F |
919 |
SEAICE_LSR |
& - sig11(I-1,J ) * _dyF(I-1,J ,bi,bj) |
|
./pkg/seaice/seaice_lsr.F |
97 |
SEAICE_LSR |
_RL sig11(1-Olx:sNx+Olx,1-Oly:sNy+Oly) |