Symbol | Description | Uses |
SPEED_SQ | 4 |
File | Line number | Procedure | Code |
./pkg/seaice/seaice_growth.F | 124 | SEAICE_GROWTH |
_RL SPEED_SQ |
./pkg/seaice/seaice_growth.F | 760 | SEAICE_GROWTH |
SPEED_SQ = |
./pkg/seaice/seaice_growth.F | 769 | SEAICE_GROWTH |
IF ( SPEED_SQ .LE. SEAICE_EPS_SQ ) THEN |
./pkg/seaice/seaice_growth.F | 772 | SEAICE_GROWTH |
UG(I,J)=SQRT(SPEED_SQ) |