| Symbol | Description | Uses |
| recip_HCUT | 4 |
| File | Line number | Procedure | Code |
| ./pkg/seaice/seaice_solve4temp.F | 102 | SEAICE_SOLVE4TEMP |
_RL TMELT, XKI, XKS, HCUT, recip_HCUT, XIO |
| ./pkg/seaice/seaice_solve4temp.F | 208 | SEAICE_SOLVE4TEMP |
recip_HCUT = 0. _d 0 |
| ./pkg/seaice/seaice_solve4temp.F | 209 | SEAICE_SOLVE4TEMP |
IF ( HCUT.GT.0. _d 0 ) recip_HCUT = 1. _d 0 / HCUT |
| ./pkg/seaice/seaice_solve4temp.F | 303 | SEAICE_SOLVE4TEMP |
ALB(I,J) = MIN( ALB_ICE(I,J) + HSNOW_ACTUAL(I,J)*recip_HCUT |