| File |
Line number |
Procedure |
Code |
|
./pkg/seaice/SEAICE_PARAMS.h |
475 |
NO PROCEDURE |
_RL SEAICE_tensilFac, SEAICE_tensilDepth, SEAICE_eccen |
|
./pkg/seaice/SEAICE_PARAMS.h |
527 |
NO PROCEDURE |
& SEAICE_strength, SEAICE_cStar, SEAICE_eccen, |
|
./pkg/seaice/dynsolver.F |
68 |
DYNSOLVER |
ECCEN=SEAICE_eccen |
|
./pkg/seaice/lsr.F |
165 |
LSR |
ECM2= 1. _d 0/(SEAICE_eccen**2) |
|
./pkg/seaice/seaice_calc_viscosities.F |
88 |
SEAICE_CALC_VISCOSITIES |
IF ( SEAICE_eccen .NE. 0. _d 0 ) recip_e2=ONE/(SEAICE_eccen**2) |
|
./pkg/seaice/seaice_evp.F |
192 |
SEAICE_EVP |
ecc2=SEAICE_eccen**2 |
|
./pkg/seaice/seaice_init_varia.F |
677 |
SEAICE_INIT_VARIA |
ETA(i,j,bi,bj) = ZETA(i,j,bi,bj)/SEAICE_eccen**2 |
|
./pkg/seaice/seaice_readparms.F |
148 |
SEAICE_READPARMS |
& SEAICE_strength, SEAICE_cStar, SEAICE_eccen, |
|
./pkg/seaice/seaice_readparms.F |
395 |
SEAICE_READPARMS |
SEAICE_eccen = 2. _d 0 |
|
./pkg/seaice/seaice_summary.F |
184 |
SEAICE_SUMMARY |
CALL WRITE_0D_RL( SEAICE_eccen,INDEX_NONE,'SEAICE_eccen =', |