| File |
Line number |
Procedure |
Code |
|
./pkg/seaice/SEAICE_PARAMS.h |
215 |
NO PROCEDURE |
_RL SEAICE_drag, SEAICE_waterDrag, SEAICE_dryIceAlb |
|
./pkg/seaice/SEAICE_PARAMS.h |
239 |
NO PROCEDURE |
& SEAICE_drag, SEAICE_waterDrag, SEAICE_dryIceAlb, |
|
./pkg/seaice/dynsolver.F |
325 |
DYNSOLVER |
IF ( TEMPVAR .LE. (QUART/SEAICE_waterDrag)**2 ) THEN |
|
./pkg/seaice/dynsolver.F |
328 |
DYNSOLVER |
DWATN(I,J,bi,bj)=SEAICE_waterDrag*SQRT(TEMPVAR) |
|
./pkg/seaice/dynsolver.F |
444 |
DYNSOLVER |
IF ( TEMPVAR .LE. (QUART/SEAICE_waterDrag)**2 ) THEN |
|
./pkg/seaice/dynsolver.F |
447 |
DYNSOLVER |
DWATN(I,J,bi,bj)=SEAICE_waterDrag*SQRT(TEMPVAR) |
|
./pkg/seaice/seaice_evp.F |
442 |
SEAICE_EVP |
IF ( TEMPVAR .LE. (QUART/SEAICE_waterDrag)**2 ) THEN |
|
./pkg/seaice/seaice_evp.F |
445 |
SEAICE_EVP |
DWATN(I,J,bi,bj)=SEAICE_waterDrag*SQRT(TEMPVAR) |
|
./pkg/seaice/seaice_lsr.F |
1064 |
SEAICE_LSR |
IF ( TEMPVAR .LE. (QUART/SEAICE_waterDrag)**2 ) THEN |
|
./pkg/seaice/seaice_lsr.F |
1067 |
SEAICE_LSR |
DWATN(I,J,bi,bj)=SEAICE_waterDrag*SQRT(TEMPVAR) |
|
./pkg/seaice/seaice_lsr.F |
233 |
SEAICE_LSR |
IF ( TEMPVAR .LE. (QUART/SEAICE_waterDrag)**2 ) THEN |
|
./pkg/seaice/seaice_lsr.F |
236 |
SEAICE_LSR |
DWATN(I,J,bi,bj)=SEAICE_waterDrag*SQRT(TEMPVAR) |
|
./pkg/seaice/seaice_readparms.F |
177 |
SEAICE_READPARMS |
SEAICE_waterDrag = 5.5 _d 0 |
|
./pkg/seaice/seaice_readparms.F |
282 |
SEAICE_READPARMS |
& SEAICE_waterDrag_south = SEAICE_waterDrag |
|
./pkg/seaice/seaice_readparms.F |
59 |
SEAICE_READPARMS |
& SEAICE_drag, SEAICE_waterDrag, SEAICE_dryIceAlb, |
|
./pkg/seaice/seaice_summary.F |
171 |
SEAICE_SUMMARY |
CALL WRITE_0D_RL( SEAICE_waterDrag ,INDEX_NONE, |