Index | Rundeck: P1SoM40 | Created: Wed May 8 03:30:18 EDT 2024 |
OCALBEDO_MOD | File: ocalbedo.f |
Author :
Version:
Subroutines:
- bbw
- bilin
- bilin_mud
- find_max
- find_min
- get_aw
- get_virtual_index
- init
- interpolate
- kw
- ocalbedo
- band_6(j) = Sum(band_33(i)*weight(i))/Sum(part_sum(i))
- reflectance
Global Variables:
- nlt :
integer, parameter
- Initial Value
= 33
- wfac :
real*8, dimension(nlt), private
- aw :
real*8, dimension(nlt), protected
- bw :
real*8, dimension(nlt), protected
- lam :
integer, dimension(nlt), protected
- initialized :
logical, private
- Initial Value
= .false.