#Script zur Begrenzung des Satelliten Zenith Winkels auf 55°, um den "Blur" Effekt bei Szenenrandpixeln zu vermeiden.
#! /bin/csh -fx
angles \
        latitude='n' \
        longitude='n' \
        sat_zenith='yes' \
        sun_zenith='n' \
        scatter_phase='n' \
        sun_reflection='n' \
        rel_azimuth='n' \
        store_cosines='n' \
        real_output='yes' \
        poly_size='100' \
$1

emathp \
        expr_vars='avhrr_ch1 avhrr_ch2 avhrr_ch3a avhrr_ch4 avhrr_ch5 sat_zenith' \
        num_exprs='10' \
        y1_expr='x1' \
        y2_expr='x2' \
	y3_expr='x3' \
	y4_expr='x4' \
	y5_expr='x5' \
	y6_expr='x6<=55 ? x1 : badval' \
	y7_expr='x6<=55 ? x2 : badval' \
	y8_expr='x6<=55 ? x3 : badval' \
	y9_expr='x6<=55 ? x4 : badval' \
	y10_expr='x6<=55 ? x5 : badval' \
	save_exprs='6 7 8 9 10' \
        var_names='avhrr_ch1 avhrr_ch2 avhrr_ch3a avhrr_ch4 avhrr_ch5' \
        var_units='albedo*100% albedo*100% temp_deg_c temp_deg_c temp_deg_c' \
        var_types='short short short short short' \
        scale_offsets='0 0 0 0 0' \
        scale_factors='1 1 1 1 1' \
$1 \
$2