| Symbol | Description | Uses |
| TEMPVAR | 7 |
| File | Line number | Procedure | Code |
| ./pkg/seaice/dynsolver.F | 238 | DYNSOLVER |
TEMPVAR=(UICE(I,J,1,bi,bj)-GWATX(I,J,bi,bj))**2 |
| ./pkg/seaice/dynsolver.F | 240 | DYNSOLVER |
IF ( TEMPVAR .LE. (QUART/SEAICE_waterDrag)**2 ) THEN |
| ./pkg/seaice/dynsolver.F | 243 | DYNSOLVER |
DWATN(I,J,bi,bj)=SEAICE_waterDrag*SQRT(TEMPVAR) |
| ./pkg/seaice/dynsolver.F | 345 | DYNSOLVER |
TEMPVAR=(UICE(I,J,1,bi,bj)-GWATX(I,J,bi,bj))**2 |
| ./pkg/seaice/dynsolver.F | 347 | DYNSOLVER |
IF ( TEMPVAR .LE. (QUART/SEAICE_waterDrag)**2 ) THEN |
| ./pkg/seaice/dynsolver.F | 350 | DYNSOLVER |
DWATN(I,J,bi,bj)=SEAICE_waterDrag*SQRT(TEMPVAR) |
| ./pkg/seaice/dynsolver.F | 45 | DYNSOLVER |
_RL TEMPVAR, U1, V1 |