| File |
Line number |
Procedure |
Code |
|
./pkg/seaice/seaice_evp.F |
202 |
SEAICE_EVP |
ep(i,j) = e11(i,j,bi,bj) + e22(i,j,bi,bj) |
|
./pkg/seaice/seaice_evp.F |
218 |
SEAICE_EVP |
& ep(I,J)**2 + recip_ecc2*em(I,J)**2 |
|
./pkg/seaice/seaice_evp.F |
223 |
SEAICE_EVP |
& ( ep(I,J )**2 + ep(I-1,J )**2 |
|
./pkg/seaice/seaice_evp.F |
224 |
SEAICE_EVP |
& + ep(I,J-1)**2 + ep(I-1,J-1)**2 |
|
./pkg/seaice/seaice_evp.F |
312 |
SEAICE_EVP |
zetaMaxC = ecc2*zetaC(I,J)*(deltaC(I,J)-ep(I,J))/etaDenC |
|
./pkg/seaice/seaice_evp.F |
319 |
SEAICE_EVP |
& - facZ * ( ep(I,J ) + ep(I-1,J ) |
|
./pkg/seaice/seaice_evp.F |
320 |
SEAICE_EVP |
& + ep(I,J-1) + ep(I-1,J-1) ) |
|
./pkg/seaice/seaice_evp.F |
327 |
SEAICE_EVP |
& ( 2. _d 0 *zetaC(I,J)*ep(I,J) - pressC(I,J) |
|
./pkg/seaice/seaice_evp.F |
342 |
SEAICE_EVP |
& ( 2. _d 0 *zetaC(I,J)*ep(I,J) - pressC(I,J) |
|
./pkg/seaice/seaice_evp.F |
82 |
SEAICE_EVP |
_RL ep (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |