mod06_run_settings.f90 File Reference

Go to the source code of this file.

Modules
module	mod06_run_settings

Variables
real(4), parameter	set_threshold_solar_zenith = 3.
real(4), parameter	set_threshold_sensor_zenith = 3.
real(4), parameter	set_threshold_relative_azimuth = 3.
real, parameter	threshold_wind_speed = 1.0
real, parameter	dscat1 = 1.0
real, parameter	dscat2 = 2.0
real, parameter	dscat3 = 3.0
integer, parameter	meas_uncertain_threshold = 15
integer, parameter	set_tilesize = 50000
integer, parameter	set_number_of_bands = 15
integer, parameter	set_albedo_bands = 6
integer, dimension(set_number_of_bands), parameter	set_bands = (/1,2,5,6,7,19,20,26,29,31,8,32,34,3,4/)
integer, parameter	band_0065 = 1
integer, parameter	band_0086 = 2
integer, parameter	band_0124 = 3
integer, parameter	band_0163 = 4
integer, parameter	band_0213 = 5
integer, parameter	band_0935 = 6
integer, parameter	band_0370 = 7
integer, parameter	band_0138 = 8
integer, parameter	band_0850 = 9
integer, parameter	band_1100 = 10
integer, parameter	band_0410 = 11
integer, parameter	band_1200 = 12
integer, parameter	band_1350 = 13
integer, parameter	band_0047 = 14
integer, parameter	band_0055 = 15
integer, parameter	channel_37um = set_bands(band_0370)
integer, parameter	channel_11um = set_bands(band_1100)
integer, parameter	channel_12um = set_bands(band_1200)
integer, parameter	re16 = 1
integer, parameter	re21 = 2
integer, parameter	re37 = 3
integer, parameter	re1621 = 4
integer, parameter	set_cf_bands = 4
integer, dimension(2), parameter	set_start = (/ 0 , 0 /)
integer, dimension(2), parameter	set_edge = (/ 1354 , 2050 /)
integer, dimension(2), parameter	set_stride = (/ 1 , 1 /)
logical, parameter	do_csr = .true.
logical, parameter	do_c4phasetest = .false.
logical, parameter	force_ice = .false.
logical, parameter	force_water = .false.
logical, parameter	do_cox_munk = .true.