specific_ancillary.f90 File Reference

Go to the source code of this file.

Modules
module	specific_ancillary

Functions/Subroutines
subroutine	setup_atm_corr
subroutine	remap_bands (tau2way, temp_trans, sdev2way, temp_sdev)

Variables
integer, parameter	numberofshortwavelengths = 7
integer, parameter	numberoflongwavelengths = 2
integer, dimension(numberofshortwavelengths)	bandindexmapsw =(/ 1,2,3,4,5,6,7 /)
integer, dimension(numberoflongwavelengths)	bandindexmaplw =(/ 7,8 /)
integer, parameter	trans_nband = 7
integer, parameter	index_2way = trans_nband
real, parameter	ozone_absorp_coeff = 5.56209e-5
real, parameter	o3_coef_470 = 4.06e-22 * 2.687e16
real, parameter	o3_coef_550 = 3.36e-21 * 2.687e16
logical	do_37
logical	have_fascode
logical, dimension(8)	have_band