| Symbol | Description | Uses |
| sAlbNIR | near IR surface albedo [0-1] | 5 |
| File | Line number | Procedure | Code |
| ./pkg/thsice/thsice_albedo.F | 13 | THSICE_ALBEDO |
O sAlb, sAlbNIR, |
| ./pkg/thsice/thsice_albedo.F | 149 | THSICE_ALBEDO |
sAlbNIR(i,j) = albNIR_ice * ( 1. _d 0 - hs/(hs + 0.02 _d 0) ) |
| ./pkg/thsice/thsice_albedo.F | 154 | THSICE_ALBEDO |
sAlbNIR(i,j) = albedo |
| ./pkg/thsice/thsice_albedo.F | 167 | THSICE_ALBEDO |
sAlbNIR(i,j) = 0. _d 0 |
| ./pkg/thsice/thsice_albedo.F | 60 | THSICE_ALBEDO |
_RL sAlbNIR(siLo:siHi,sjLo:sjHi) |