| Symbol | Description | Uses |
| fswpen | 5 |
| File | Line number | Procedure | Code |
| ./pkg/thsice/thsice_solve4temp.F | 140 | THSICE_SOLVE4TEMP |
fswpen = flxSW * (1. _d 0 - frsnow) * i0 |
| ./pkg/thsice/thsice_solve4temp.F | 141 | THSICE_SOLVE4TEMP |
fswocn = fswpen * exp(-ksolar*hi) |
| ./pkg/thsice/thsice_solve4temp.F | 142 | THSICE_SOLVE4TEMP |
fswint = fswpen - fswocn |
| ./pkg/thsice/thsice_solve4temp.F | 144 | THSICE_SOLVE4TEMP |
fswdn = flxSW - fswpen |
| ./pkg/thsice/thsice_solve4temp.F | 95 | THSICE_SOLVE4TEMP |
_RL fswpen ! SW penetrating beneath surface (W m-2) |