| File |
Line number |
Procedure |
Code |
|
./pkg/seaice/seaice_evp.F |
370 |
SEAICE_EVP |
sig22(I,J) = 0.5 _d 0 * |
|
./pkg/seaice/seaice_evp.F |
396 |
SEAICE_EVP |
& ( sig22(I,J ) * _dxF(I,J ,bi,bj) |
|
./pkg/seaice/seaice_evp.F |
397 |
SEAICE_EVP |
& - sig22(I,J-1) * _dxF(I,J-1,bi,bj) |
|
./pkg/seaice/seaice_evp.F |
80 |
SEAICE_EVP |
_RL sig22 (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/seaice/seaice_lsr.F |
696 |
SEAICE_LSR |
sig22(I,J) = zetaMinusEta(I,J,bi,bj) |
|
./pkg/seaice/seaice_lsr.F |
739 |
SEAICE_LSR |
& + _dxF(I ,J ,bi,bj) * sig22(I ,J ) |
|
./pkg/seaice/seaice_lsr.F |
740 |
SEAICE_LSR |
& - _dxF(I ,J-1,bi,bj) * sig22(I ,J-1) ) |
|
./pkg/seaice/seaice_lsr.F |
893 |
SEAICE_LSR |
sig22(I,J) = 0. _d 0 |
|
./pkg/seaice/seaice_lsr.F |
904 |
SEAICE_LSR |
sig22(I,J) = zeta(I,J,bi,bj)*eplus - eta(I,J,bi,bj)*eminus |
|
./pkg/seaice/seaice_lsr.F |
924 |
SEAICE_LSR |
& ( sig22(I ,J ) * _dxF(I ,J ,bi,bj) |
|
./pkg/seaice/seaice_lsr.F |
925 |
SEAICE_LSR |
& - sig22(I ,J-1) * _dxF(I ,J-1,bi,bj) |
|
./pkg/seaice/seaice_lsr.F |
98 |
SEAICE_LSR |
_RL sig22(1-Olx:sNx+Olx,1-Oly:sNy+Oly) |