FV3 Bundle
CRTM_Model_Profiles.f90 File Reference

Go to the source code of this file.

Modules

module  crtm_model_profiles
 

Functions/Subroutines

subroutine, public crtm_model_profiles::crtm_get_model_profile (absorber_id, p, t, a, Model)
 

Variables

character(*), parameter crtm_model_profiles::module_rcs_id = '$Id: CRTM_Model_Profiles.f90 60152 2015-08-13 19:19:13Z paul.vandelst@noaa.gov $'
 
integer, parameter crtm_model_profiles::n_model_levels = 101
 
integer, parameter crtm_model_profiles::n_model_layers = N_MODEL_LEVELS-1
 
integer, parameter crtm_model_profiles::n_model_absorbers = 6
 
integer, parameter crtm_model_profiles::h2o = 1
 
integer, parameter crtm_model_profiles::o3 = 2
 
integer, parameter crtm_model_profiles::co2 = 3
 
integer, parameter crtm_model_profiles::n2o = 4
 
integer, parameter crtm_model_profiles::co = 5
 
integer, parameter crtm_model_profiles::ch4 = 6
 
integer, parameter crtm_model_profiles::h2o_id = 1
 
integer, parameter crtm_model_profiles::co2_id = 2
 
integer, parameter crtm_model_profiles::o3_id = 3
 
integer, parameter crtm_model_profiles::n2o_id = 4
 
integer, parameter crtm_model_profiles::co_id = 5
 
integer, parameter crtm_model_profiles::ch4_id = 6
 
integer, dimension(n_model_absorbers), parameter crtm_model_profiles::absorber_id_map = (/ H2O, CO2, O3, N2O, CO, CH4 /)
 
real(fp), dimension(0:n_model_layers), parameter, public crtm_model_profiles::model_level_pressure = (/ 0.00500000_fp, 0.01606500_fp, 0.03838300_fp, 0.07687900_fp, 0.13695400_fp, 0.22441200_fp, 0.34540400_fp, 0.50637400_fp, 0.71402300_fp, 0.97527400_fp, 1.29724000_fp, 1.68720000_fp, 2.15257300_fp, 2.70089700_fp, 3.33981200_fp, 4.07703800_fp, 4.92036200_fp, 5.87762300_fp, 6.95669500_fp, 8.16548000_fp, 9.51188900_fp, 11.00383500_fp, 12.64922300_fp, 14.45593600_fp, 16.43183300_fp, 18.58473200_fp, 20.92240800_fp, 23.45258300_fp, 26.18291800_fp, 29.12100900_fp, 32.27437800_fp, 35.65046700_fp, 39.25663300_fp, 43.10014400_fp, 47.18817100_fp, 51.52778600_fp, 56.12595300_fp, 60.98953000_fp, 66.12525900_fp, 71.53976800_fp, 77.23956000_fp, 83.23101600_fp, 89.52039000_fp, 96.11380300_fp, 103.01724400_fp, 110.23656500_fp, 117.77748100_fp, 125.64556200_fp, 133.84624000_fp, 142.38479600_fp, 151.26636600_fp, 160.49593900_fp, 170.07834800_fp, 180.01827900_fp, 190.32026000_fp, 200.98866500_fp, 212.02771200_fp, 223.44146100_fp, 235.23381400_fp, 247.40851400_fp, 259.96914200_fp, 272.91912000_fp, 286.26170600_fp, 300.00000000_fp, 314.13693600_fp, 328.67528600_fp, 343.61765900_fp, 358.96650300_fp, 374.72409800_fp, 390.89256600_fp, 407.47386100_fp, 424.46977600_fp, 441.88194100_fp, 459.71182100_fp, 477.96072200_fp, 496.62978500_fp, 515.71998900_fp, 535.23215300_fp, 555.16693500_fp, 575.52483200_fp, 596.30618200_fp, 617.51116300_fp, 639.13979700_fp, 661.19194600_fp, 683.66731600_fp, 706.56546000_fp, 729.88577200_fp, 753.62749400_fp, 777.78971600_fp, 802.37137600_fp, 827.37125900_fp, 852.78800300_fp, 878.62009600_fp, 904.86588000_fp, 931.52354900_fp, 958.59115400_fp, 986.06660100_fp, 1013.94765500_fp, 1042.23194000_fp, 1070.91694000_fp, 1100.00000000_fp /)
 
real(fp), dimension(0:n_model_layers, n_models), save crtm_model_profiles::level_temperature
 
real(fp), dimension(0:n_model_layers, n_model_absorbers, n_models), save crtm_model_profiles::level_absorber