File |
Line number |
Procedure |
Code |
./pkg/seaice/SEAICE_PARAMS.h |
497 |
NO PROCEDURE |
_RL SEAICE_evpAlpha, SEAICE_evpBeta |
./pkg/seaice/SEAICE_PARAMS.h |
512 |
NO PROCEDURE |
& SEAICE_evpAlpha, SEAICE_evpBeta, |
./pkg/seaice/seaice_evp.F |
204 |
SEAICE_EVP |
denom1(I,J,bi,bj) = 1. _d 0 / ( SEAICE_evpAlpha + 1. _d 0 ) |
./pkg/seaice/seaice_evp.F |
205 |
SEAICE_EVP |
denom2(I,J,bi,bj) = 1. _d 0 / ( SEAICE_evpAlpha + ecc2 ) |
./pkg/seaice/seaice_evp.F |
212 |
SEAICE_EVP |
IF ( SEAICE_evpAlpha .GT. 0. _d 0 ) |
./pkg/seaice/seaice_evp.F |
213 |
SEAICE_EVP |
& recip_evpAlpha = 1. _d 0 / SEAICE_evpAlpha |
./pkg/seaice/seaice_evp.F |
228 |
SEAICE_EVP |
denom1(I,J,bi,bj) = 1. _d 0 / SEAICE_evpAlpha |
./pkg/seaice/seaice_evp.F |
259 |
SEAICE_EVP |
evpAlphaC(I,J,bi,bj) = SEAICE_evpAlpha |
./pkg/seaice/seaice_evp.F |
260 |
SEAICE_EVP |
evpAlphaZ(I,J,bi,bj) = SEAICE_evpAlpha |
./pkg/seaice/seaice_evp.F |
290 |
SEAICE_EVP |
fac = 0.25 _d 0 * SEAICE_evpDampC * SEAICE_evpAlpha |
./pkg/seaice/seaice_readparms.F |
118 |
SEAICE_READPARMS |
& SEAICE_evpAlpha, SEAICE_evpBeta, |
./pkg/seaice/seaice_readparms.F |
342 |
SEAICE_READPARMS |
SEAICE_evpAlpha = UNSET_RL |
./pkg/seaice/seaice_readparms.F |
718 |
SEAICE_READPARMS |
IF ( SEAICE_evpAlpha .NE. UNSET_RL |
./pkg/seaice/seaice_readparms.F |
744 |
SEAICE_READPARMS |
IF ( SEAICE_evpAlpha .NE. UNSET_RL .AND. |
./pkg/seaice/seaice_readparms.F |
745 |
SEAICE_READPARMS |
& SEAICE_evpBeta .EQ. UNSET_RL ) SEAICE_evpBeta = SEAICE_evpAlpha |
./pkg/seaice/seaice_readparms.F |
747 |
SEAICE_READPARMS |
& SEAICE_evpAlpha .EQ. UNSET_RL ) SEAICE_evpAlpha = SEAICE_evpBeta |
./pkg/seaice/seaice_readparms.F |
754 |
SEAICE_READPARMS |
IF ( SEAICE_evpAlpha .EQ. UNSET_RL ) THEN |
./pkg/seaice/seaice_readparms.F |
755 |
SEAICE_READPARMS |
SEAICE_evpAlpha = 2. _d 0 * SEAICE_evpTauRelax/SEAICE_deltaTevp |
./pkg/seaice/seaice_readparms.F |
757 |
SEAICE_READPARMS |
SEAICE_evpTauRelax = 0.5 _d 0 *SEAICE_evpAlpha*SEAICE_deltaTevp |
./pkg/seaice/seaice_summary.F |
277 |
SEAICE_SUMMARY |
CALL WRITE_0D_RL( SEAICE_evpAlpha ,INDEX_NONE, |