; This Streamer input file shows how to use a BRDF model to calculate AVHRR ; channels 1 and 3 albedos. It also illustrates the use of the print statement. OPTIONS .FALSE. ; Compute fluxes (or radiances)? (FLUXES) .false. ; Include thermal emission in band 106? (IR106) .FALSE. ; Compute cloud forcing? (CLDFRC) 8 4 ; Number of streams, short and long (NSTR*) 24 ; Number of Legendre coeff. (NCOEF) .FALSE. ; Include gaseous absorption? (GASABS) .TRUE. ; Include Rayleigh scatter (shortwave)? (RAYLISHRT) 6 ; Surface albedo control (ALBTYPE) 4 ; Surface emissivity control (EMISSTYPE) 7 .FALSE. ; Std prof; extend input profile to 100 km? 5 1 ; Aerosol model and profile 1 2 3 1 1 3 4 ; Height, temp, wv, oz, cloud units, band spec. 3 ; Output levels control .false. ; Descriptive output desired? .true. ; User-customized output? testbrdf2.out ../testio/avhrr-12.wts .FALSE. ; Read cloud optical properties? CPRINT channel, zen, satalb(1,1), satalb(2,1), \ satalb(3,1), satalb(1,2), satalb(2,2), satalb(3,2) setdata Cloudy, April conditions, AVHRR channel 1 92 4 28 22.0 72.88 144.50 -99.0 3 0.6 0.87 1.0 2 45.0 135.0 1 1 0.99 0.6 0.995 0.0 ; Hapke model, snow-like -999., 0.99 ; tsurf, emiss 1 1 1.0 999. 530.0 999 5.0 1 0 10.0 0.20 999 999 999 0 ; Cloud overlap 2 2 2 2 2 2 0 1.0 1.0 1.0 1.0 1.0 1.0 exchange channel=[1,3] ; Now let's switch to the default brdf model for snow, which will give us ; the same results as above. replace albtype=5,whichsurfs(1)=5, channel=[1,3]