radlw_datatb.f File Reference

Go to the source code of this file.

Modules
module	module_radlw_avplank
	This module contains plank flux data.
module	module_radlw_ref
	This module contains reference temperature and pressure.
module	module_radlw_cldprlw
	This module contains cloud property coefficients.
module	module_radlw_kgb01
	This module sets up absorption coefficients for band 01: 10-250 cm-1 (low - h2o; high - h2o)
module	module_radlw_kgb02
	This module sets up absorption coefficients for band 02: 250-500 cm-1 (low - h2o; high - h2o)
module	module_radlw_kgb03
	This module sets up absorption coefficients for band 03: 500-630 cm-1 (low - h2o, co2; high - h2o, co2)
module	module_radlw_kgb04
	This module sets up absorption coefficients for band 04: 630-700 cm-1 (low - h2o, co2; high - co2, o3)
module	module_radlw_kgb05
	This module sets up absorption coefficients for band 05: 700-820 cm-1 (low - h2o, co2; high - co2, o3)
module	module_radlw_kgb06
	This module sets up absorption coefficients for band 06: 820-980 cm-1 (low - h2o; high - /)
module	module_radlw_kgb07
	This module sets up absorption coefficients for band 07: 980-1080 cm-1 (low - h2o, o3; high - o3)
module	module_radlw_kgb08
	This module sets up absorption coefficients for band 08: 1080-1180 cm-1 (low - h2o; high - o3)
module	module_radlw_kgb09
	This module sets up absorption coefficients for band 09: 1180-1390 cm-1 (low - h2o, ch4; high - ch4)
module	module_radlw_kgb10
	This module sets up absorption coefficients for band 10: 1390-1480 cm-1 (low - h2o; high - h2o)
module	module_radlw_kgb11
	This module sets up absorption coefficients for band 11: 1480-1800 cm-1 (low - h2o; high - h2o)
module	module_radlw_kgb12
	This module sets up absorption coefficients for band 12: 1800-2080 cm-1 (low - h2o, co2; high - /)
module	module_radlw_kgb13
	This module sets up absorption coefficients for band 13: 2080-2250 cm-1 (low - h2o, n2o; high - /)
module	module_radlw_kgb14
	This module sets up absorption coefficients for band 14: 2250-2380 cm-1 (low - co2; high - co2)
module	module_radlw_kgb15
	This module sets up absorption coefficients for band 15: 2380-2600 cm-1 (low - n2o, co2; high - /)
module	module_radlw_kgb16
	This module sets up absorption coefficients for band 16: 2600-3000 cm-1 (low - h2o, ch4; high - /)

Variables
real(kind=kind_phys), dimension(nplnk, nbands), public	module_radlw_avplank::totplnk
real(kind=kind_phys), dimension(59)	module_radlw_ref::pref
real(kind=kind_phys), dimension(59)	module_radlw_ref::preflog
real(kind=kind_phys), dimension(59)	module_radlw_ref::tref
real(kind=kind_phys), dimension(7, 59)	module_radlw_ref::chi_mls
integer, dimension(nbands)	module_radlw_cldprlw::ipat
	ipat is bands index for ebert&curry ice cloud (for iflagice=1) More...
real(kind=kind_phys), parameter	module_radlw_cldprlw::absrain = 0.33e-3
	absrain is the rain drop absorption coefficient (m2/g) More...
real(kind=kind_phys), parameter	module_radlw_cldprlw::abssnow0 = 1.5
	abssnow0 is the snow flake absorption coefficient (micron), fu coeff More...
real(kind=kind_phys), parameter	module_radlw_cldprlw::abssnow1 = 2.34e-3
	abssnow1 is the snow flake absorption coefficient (m2/g), ncar coeff More...
real(kind=kind_phys), dimension(58, nbands)	module_radlw_cldprlw::absliq1
	Hu and Stamnes method. the liquid water absorption coefficients are listed for a range of effective radii from 2.5 to 59.5 microns in increments of 1.0 micron. More...
real(kind=kind_phys), dimension(2)	module_radlw_cldprlw::absice0
	for iflagice = 2 or 3, absice0 are the ice water absorption coefficients used for large ice partical size such as refice > 131 microns. More...
real(kind=kind_phys), dimension(2, 5)	module_radlw_cldprlw::absice1
	for iflagice = 1, absice1 are the ice water absorption coefficients used for ebert and curry method More...
real(kind=kind_phys), dimension(43, nbands)	module_radlw_cldprlw::absice2
	for iflagice =2, absice2 are the ice water absorption coefficients used for streamer method. the absorption coefficients are listed for a range of effective radii from 5.0 to 131.0 microns in increments of 3.0 microns. spherical ice particle parameterization absorption units (abs coef/iwc): [(m^-1)/(g m^-3)] More...
real(kind=kind_phys), dimension(46, nbands)	module_radlw_cldprlw::absice3
	for iflagice = 3, absice3 are the ice water absorption coefficients used for fu parameterization. particle size 5 - 140 micron in increments of 3 microns. units = m2/g. hexagonal ice particle parameterization absorption units (abs coef/iwc): [(m^-1)/(g m^-3)] More...
integer, public	module_radlw_kgb01::msa01
integer, public	module_radlw_kgb01::msb01
integer, public	module_radlw_kgb01::msf01
integer, public	module_radlw_kgb01::mfr01
integer, public	module_radlw_kgb01::mmn01
real(kind=kind_phys), dimension(ng01, msa01), public	module_radlw_kgb01::absa
real(kind=kind_phys), dimension(ng01, msb01), public	module_radlw_kgb01::absb
real(kind=kind_phys), dimension(ng01, msf01), public	module_radlw_kgb01::selfref
real(kind=kind_phys), dimension(ng01, mfr01), public	module_radlw_kgb01::forref
real(kind=kind_phys), dimension(ng01), public	module_radlw_kgb01::fracrefa
real(kind=kind_phys), dimension(ng01), public	module_radlw_kgb01::fracrefb
real(kind=kind_phys), dimension(ng01, mmn01), public	module_radlw_kgb01::ka_mn2
real(kind=kind_phys), dimension(ng01, mmn01), public	module_radlw_kgb01::kb_mn2
integer, public	module_radlw_kgb02::msa02
integer, public	module_radlw_kgb02::msb02
integer, public	module_radlw_kgb02::msf02
integer, public	module_radlw_kgb02::mfr02
real(kind=kind_phys), dimension(ng02, msa02), public	module_radlw_kgb02::absa
real(kind=kind_phys), dimension(ng02, msb02), public	module_radlw_kgb02::absb
real(kind=kind_phys), dimension(ng02, msf02), public	module_radlw_kgb02::selfref
real(kind=kind_phys), dimension(ng02, mfr02), public	module_radlw_kgb02::forref
real(kind=kind_phys), dimension(ng02), public	module_radlw_kgb02::fracrefa
real(kind=kind_phys), dimension(ng02), public	module_radlw_kgb02::fracrefb
integer, public	module_radlw_kgb03::msa03
integer, public	module_radlw_kgb03::msb03
integer, public	module_radlw_kgb03::msf03
integer, public	module_radlw_kgb03::mfr03
integer, public	module_radlw_kgb03::maf03
integer, public	module_radlw_kgb03::mbf03
integer, public	module_radlw_kgb03::mmn03
real(kind=kind_phys), dimension(ng03, mfr03), public	module_radlw_kgb03::forref
real(kind=kind_phys), dimension(ng03, msa03), public	module_radlw_kgb03::absa
real(kind=kind_phys), dimension(ng03, msb03), public	module_radlw_kgb03::absb
real(kind=kind_phys), dimension(ng03, msf03), public	module_radlw_kgb03::selfref
real(kind=kind_phys), dimension(ng03, maf03), public	module_radlw_kgb03::fracrefa
real(kind=kind_phys), dimension(ng03, mbf03), public	module_radlw_kgb03::fracrefb
real(kind=kind_phys), dimension(ng03, maf03, mmn03), public	module_radlw_kgb03::ka_mn2o
real(kind=kind_phys), dimension(ng03, mbf03, mmn03), public	module_radlw_kgb03::kb_mn2o
integer, public	module_radlw_kgb04::msa04
integer, public	module_radlw_kgb04::msb04
integer, public	module_radlw_kgb04::msf04
integer, public	module_radlw_kgb04::mfr04
integer, public	module_radlw_kgb04::maf04
integer, public	module_radlw_kgb04::mbf04
real(kind=kind_phys), dimension(ng04, mfr04), public	module_radlw_kgb04::forref
real(kind=kind_phys), dimension(ng04, msa04), public	module_radlw_kgb04::absa
real(kind=kind_phys), dimension(ng04, msb04), public	module_radlw_kgb04::absb
real(kind=kind_phys), dimension(ng04, msf04), public	module_radlw_kgb04::selfref
real(kind=kind_phys), dimension(ng04, maf04), public	module_radlw_kgb04::fracrefa
real(kind=kind_phys), dimension(ng04, mbf04), public	module_radlw_kgb04::fracrefb
integer, public	module_radlw_kgb05::msa05
integer, public	module_radlw_kgb05::msb05
integer, public	module_radlw_kgb05::msf05
integer, public	module_radlw_kgb05::mfr05
integer, public	module_radlw_kgb05::maf05
integer, public	module_radlw_kgb05::mbf05
integer, public	module_radlw_kgb05::mmo05
real(kind=kind_phys), dimension(ng05, mfr05), public	module_radlw_kgb05::forref
real(kind=kind_phys), dimension(ng05, msa05), public	module_radlw_kgb05::absa
real(kind=kind_phys), dimension(ng05, msb05), public	module_radlw_kgb05::absb
real(kind=kind_phys), dimension(ng05, msf05), public	module_radlw_kgb05::selfref
real(kind=kind_phys), dimension(ng05, maf05), public	module_radlw_kgb05::fracrefa
real(kind=kind_phys), dimension(ng05, mbf05), public	module_radlw_kgb05::fracrefb
real(kind=kind_phys), dimension(ng05, maf05, mmo05), public	module_radlw_kgb05::ka_mo3
real(kind=kind_phys), dimension(ng05), public	module_radlw_kgb05::ccl4
integer, public	module_radlw_kgb06::msa06
integer, public	module_radlw_kgb06::msf06
integer, public	module_radlw_kgb06::mfr06
integer, public	module_radlw_kgb06::mmc06
real(kind=kind_phys), dimension(ng06, mfr06), public	module_radlw_kgb06::forref
real(kind=kind_phys), dimension(ng06, msa06), public	module_radlw_kgb06::absa
real(kind=kind_phys), dimension(ng06), public	module_radlw_kgb06::fracrefa
real(kind=kind_phys), dimension(ng06, msf06), public	module_radlw_kgb06::selfref
real(kind=kind_phys), dimension(ng06, mmc06), public	module_radlw_kgb06::ka_mco2
real(kind=kind_phys), dimension(ng06), public	module_radlw_kgb06::cfc11adj
real(kind=kind_phys), dimension(ng06), public	module_radlw_kgb06::cfc12
integer, public	module_radlw_kgb07::msa07
integer, public	module_radlw_kgb07::msb07
integer, public	module_radlw_kgb07::msf07
integer, public	module_radlw_kgb07::mfr07
integer, public	module_radlw_kgb07::maf07
integer, public	module_radlw_kgb07::mmc07
real(kind=kind_phys), dimension(ng07, mfr07), public	module_radlw_kgb07::forref
real(kind=kind_phys), dimension(ng07, msa07), public	module_radlw_kgb07::absa
real(kind=kind_phys), dimension(ng07, msb07), public	module_radlw_kgb07::absb
real(kind=kind_phys), dimension(ng07, msf07), public	module_radlw_kgb07::selfref
real(kind=kind_phys), dimension(ng07, maf07), public	module_radlw_kgb07::fracrefa
real(kind=kind_phys), dimension(ng07), public	module_radlw_kgb07::fracrefb
real(kind=kind_phys), dimension(ng07, maf07, mmc07), public	module_radlw_kgb07::ka_mco2
real(kind=kind_phys), dimension(ng07, mmc07), public	module_radlw_kgb07::kb_mco2
integer, public	module_radlw_kgb08::msa08
integer, public	module_radlw_kgb08::msb08
integer, public	module_radlw_kgb08::msf08
integer, public	module_radlw_kgb08::mfr08
integer, public	module_radlw_kgb08::mmc08
real(kind=kind_phys), dimension(ng08, mfr08), public	module_radlw_kgb08::forref
real(kind=kind_phys), dimension(ng08, msa08), public	module_radlw_kgb08::absa
real(kind=kind_phys), dimension(ng08, msb08), public	module_radlw_kgb08::absb
real(kind=kind_phys), dimension(ng08, msf08), public	module_radlw_kgb08::selfref
real(kind=kind_phys), dimension(ng08), public	module_radlw_kgb08::fracrefa
real(kind=kind_phys), dimension(ng08), public	module_radlw_kgb08::fracrefb
real(kind=kind_phys), dimension(ng08, mmc08), public	module_radlw_kgb08::ka_mo3
real(kind=kind_phys), dimension(ng08, mmc08), public	module_radlw_kgb08::ka_mco2
real(kind=kind_phys), dimension(ng08, mmc08), public	module_radlw_kgb08::kb_mco2
real(kind=kind_phys), dimension(ng08), public	module_radlw_kgb08::cfc12
real(kind=kind_phys), dimension(ng08, mmc08), public	module_radlw_kgb08::ka_mn2o
real(kind=kind_phys), dimension(ng08, mmc08), public	module_radlw_kgb08::kb_mn2o
real(kind=kind_phys), dimension(ng08), public	module_radlw_kgb08::cfc22adj
integer, public	module_radlw_kgb09::msa09
integer, public	module_radlw_kgb09::msb09
integer, public	module_radlw_kgb09::msf09
integer, public	module_radlw_kgb09::mfr09
integer, public	module_radlw_kgb09::maf09
integer, public	module_radlw_kgb09::mmn09
real(kind=kind_phys), dimension(ng09, mfr09), public	module_radlw_kgb09::forref
real(kind=kind_phys), dimension(ng09, msa09), public	module_radlw_kgb09::absa
real(kind=kind_phys), dimension(ng09, msb09), public	module_radlw_kgb09::absb
real(kind=kind_phys), dimension(ng09, msf09), public	module_radlw_kgb09::selfref
real(kind=kind_phys), dimension(ng09, maf09), public	module_radlw_kgb09::fracrefa
real(kind=kind_phys), dimension(ng09), public	module_radlw_kgb09::fracrefb
real(kind=kind_phys), dimension(ng09, maf09, mmn09), public	module_radlw_kgb09::ka_mn2o
real(kind=kind_phys), dimension(ng09, mmn09), public	module_radlw_kgb09::kb_mn2o
integer, public	module_radlw_kgb10::msa10
integer, public	module_radlw_kgb10::msb10
integer, public	module_radlw_kgb10::msf10
integer, public	module_radlw_kgb10::mfr10
real(kind=kind_phys), dimension(ng10, msa10), public	module_radlw_kgb10::absa
real(kind=kind_phys), dimension(ng10, msb10), public	module_radlw_kgb10::absb
real(kind=kind_phys), dimension(ng10, msf10), public	module_radlw_kgb10::selfref
real(kind=kind_phys), dimension(ng10, mfr10), public	module_radlw_kgb10::forref
real(kind=kind_phys), dimension(ng10), public	module_radlw_kgb10::fracrefa
real(kind=kind_phys), dimension(ng10), public	module_radlw_kgb10::fracrefb
integer, public	module_radlw_kgb11::msa11
integer, public	module_radlw_kgb11::msb11
integer, public	module_radlw_kgb11::msf11
integer, public	module_radlw_kgb11::mfr11
integer, public	module_radlw_kgb11::mmo11
real(kind=kind_phys), dimension(ng11, msa11), public	module_radlw_kgb11::absa
real(kind=kind_phys), dimension(ng11, msb11), public	module_radlw_kgb11::absb
real(kind=kind_phys), dimension(ng11, msf11), public	module_radlw_kgb11::selfref
real(kind=kind_phys), dimension(ng11, mfr11), public	module_radlw_kgb11::forref
real(kind=kind_phys), dimension(ng11), public	module_radlw_kgb11::fracrefa
real(kind=kind_phys), dimension(ng11), public	module_radlw_kgb11::fracrefb
real(kind=kind_phys), dimension(ng11, mmo11), public	module_radlw_kgb11::ka_mo2
real(kind=kind_phys), dimension(ng11, mmo11), public	module_radlw_kgb11::kb_mo2
integer, public	module_radlw_kgb12::msa12
integer, public	module_radlw_kgb12::msf12
integer, public	module_radlw_kgb12::mfr12
integer, public	module_radlw_kgb12::maf12
real(kind=kind_phys), dimension(ng12, msa12), public	module_radlw_kgb12::absa
real(kind=kind_phys), dimension(ng12, mfr12), public	module_radlw_kgb12::forref
real(kind=kind_phys), dimension(ng12, msf12), public	module_radlw_kgb12::selfref
real(kind=kind_phys), dimension(ng12, maf12), public	module_radlw_kgb12::fracrefa
integer, public	module_radlw_kgb13::msa13
integer, public	module_radlw_kgb13::msf13
integer, public	module_radlw_kgb13::mfr13
integer, public	module_radlw_kgb13::maf13
integer, public	module_radlw_kgb13::mmo13
real(kind=kind_phys), dimension(ng13, msa13), public	module_radlw_kgb13::absa
real(kind=kind_phys), dimension(ng13, mfr13), public	module_radlw_kgb13::forref
real(kind=kind_phys), dimension(ng13, msf13), public	module_radlw_kgb13::selfref
real(kind=kind_phys), dimension(ng13, maf13), public	module_radlw_kgb13::fracrefa
real(kind=kind_phys), dimension(ng13), public	module_radlw_kgb13::fracrefb
real(kind=kind_phys), dimension(ng13, maf13, mmo13), public	module_radlw_kgb13::ka_mco2
real(kind=kind_phys), dimension(ng13, maf13, mmo13), public	module_radlw_kgb13::ka_mco
real(kind=kind_phys), dimension(ng13, mmo13), public	module_radlw_kgb13::kb_mo3
integer, public	module_radlw_kgb14::msa14
integer, public	module_radlw_kgb14::msb14
integer, public	module_radlw_kgb14::msf14
integer, public	module_radlw_kgb14::mfr14
real(kind=kind_phys), dimension(ng14, msa14), public	module_radlw_kgb14::absa
real(kind=kind_phys), dimension(ng14, msb14), public	module_radlw_kgb14::absb
real(kind=kind_phys), dimension(ng14, msf14), public	module_radlw_kgb14::selfref
real(kind=kind_phys), dimension(ng14, mfr14), public	module_radlw_kgb14::forref
real(kind=kind_phys), dimension(ng14), public	module_radlw_kgb14::fracrefa
real(kind=kind_phys), dimension(ng14), public	module_radlw_kgb14::fracrefb
integer, public	module_radlw_kgb15::msa15
integer, public	module_radlw_kgb15::msf15
integer, public	module_radlw_kgb15::mfr15
integer, public	module_radlw_kgb15::maf15
integer, public	module_radlw_kgb15::mmn15
real(kind=kind_phys), dimension(ng15, msa15), public	module_radlw_kgb15::absa
real(kind=kind_phys), dimension(ng15, mfr15), public	module_radlw_kgb15::forref
real(kind=kind_phys), dimension(ng15, msf15), public	module_radlw_kgb15::selfref
real(kind=kind_phys), dimension(ng15, maf15), public	module_radlw_kgb15::fracrefa
real(kind=kind_phys), dimension(ng15, maf15, mmn15), public	module_radlw_kgb15::ka_mn2
integer, public	module_radlw_kgb16::msa16
integer, public	module_radlw_kgb16::msb16
integer, public	module_radlw_kgb16::msf16
integer, public	module_radlw_kgb16::mfr16
integer, public	module_radlw_kgb16::maf16
real(kind=kind_phys), dimension(ng16, mfr16), public	module_radlw_kgb16::forref
real(kind=kind_phys), dimension(ng16, msa16), public	module_radlw_kgb16::absa
real(kind=kind_phys), dimension(ng16, msb16), public	module_radlw_kgb16::absb
real(kind=kind_phys), dimension(ng16, msf16), public	module_radlw_kgb16::selfref
real(kind=kind_phys), dimension(ng16, maf16), public	module_radlw_kgb16::fracrefa
real(kind=kind_phys), dimension(ng16), public	module_radlw_kgb16::fracrefb