| File |
Line number |
Procedure |
Code |
|
./pkg/seaice/SEAICE_PARAMS.h |
483 |
NO PROCEDURE |
_RL SEAICE_mcPheeTaper, SEAICE_mcPheePiston |
|
./pkg/seaice/SEAICE_PARAMS.h |
536 |
NO PROCEDURE |
& SEAICE_mcPheeTaper, SEAICE_mcPheePiston, |
|
./pkg/seaice/seaice_check.F |
145 |
SEAICE_CHECK |
IF ( ( SEAICE_mcPheeTaper .LT. 0. _d 0 ) .OR. |
|
./pkg/seaice/seaice_check.F |
146 |
SEAICE_CHECK |
& ( SEAICE_mcPheeTaper .GT. 1. _d 0 ) ) THEN |
|
./pkg/seaice/seaice_growth.F |
1051 |
SEAICE_GROWTH |
& SEAICE_mcPheeTaper * AREApreTH(I,J) |
|
./pkg/seaice/seaice_growth.F |
1054 |
SEAICE_GROWTH |
MixedLayerTurbulenceFactor = ONE - SEAICE_mcPheeTaper |
|
./pkg/seaice/seaice_readparms.F |
159 |
SEAICE_READPARMS |
& SEAICE_mcPheePiston, SEAICE_frazilFrac, SEAICE_mcPheeTaper, |
|
./pkg/seaice/seaice_readparms.F |
453 |
SEAICE_READPARMS |
SEAICE_mcPheeTaper = UNSET_RL |
|
./pkg/seaice/seaice_readparms.F |
863 |
SEAICE_READPARMS |
IF ( SEAICE_mcPheeTaper .EQ. UNSET_RL ) THEN |
|
./pkg/seaice/seaice_readparms.F |
865 |
SEAICE_READPARMS |
SEAICE_mcPheeTaper = 0.0 _d 0 |
|
./pkg/seaice/seaice_readparms.F |
867 |
SEAICE_READPARMS |
SEAICE_mcPheeTaper = SEAICE_availHeatTaper |
|
./pkg/seaice/seaice_summary.F |
418 |
SEAICE_SUMMARY |
CALL WRITE_0D_RL ( SEAICE_mcPheeTaper, INDEX_NONE, |