|
| integer, parameter | mod_cosp_constants::i_lscliq = 1 |
| |
| integer, parameter | mod_cosp_constants::i_lscice = 2 |
| |
| integer, parameter | mod_cosp_constants::i_lsrain = 3 |
| |
| integer, parameter | mod_cosp_constants::i_lssnow = 4 |
| |
| integer, parameter | mod_cosp_constants::i_cvcliq = 5 |
| |
| integer, parameter | mod_cosp_constants::i_cvcice = 6 |
| |
| integer, parameter | mod_cosp_constants::i_cvrain = 7 |
| |
| integer, parameter | mod_cosp_constants::i_cvsnow = 8 |
| |
| integer, parameter | mod_cosp_constants::i_lsgrpl = 9 |
| |
| real, parameter | mod_cosp_constants::r_undef = nf90_fill_real |
| |
| integer, parameter | mod_cosp_constants::n_out_list = 27 |
| |
| real, parameter | mod_cosp_constants::r_ground = -1.0E20 |
| |
| integer, parameter | mod_cosp_constants::i_lsc = 1 |
| |
| integer, parameter | mod_cosp_constants::i_cvc = 2 |
| |
| integer, parameter | mod_cosp_constants::dbze_bins = 15 |
| |
| real, parameter | mod_cosp_constants::dbze_min = -100.0 |
| |
| real, parameter | mod_cosp_constants::dbze_max = 80.0 |
| |
| real, parameter | mod_cosp_constants::cfad_ze_min = -50.0 |
| |
| real, parameter | mod_cosp_constants::cfad_ze_width = 5.0 |
| |
| integer, parameter | mod_cosp_constants::sr_bins = 15 |
| |
| integer, parameter | mod_cosp_constants::dpol_bins = 6 |
| |
| real, parameter | mod_cosp_constants::lidar_undef = 999.999 |
| |
| integer, parameter | mod_cosp_constants::lidar_ncat = 4 |
| |
| integer, parameter | mod_cosp_constants::parasol_nrefl = 5 |
| |
| real, dimension(parasol_nrefl), parameter | mod_cosp_constants::parasol_sza = (/0.0, 20.0, 40.0, 6.0, 80.0/) |
| |
| real, parameter | mod_cosp_constants::default_lidar_reff = 30.0e-6 |
| |
| integer, parameter | mod_cosp_constants::misr_n_cth = 16 |
| |
| integer, parameter | mod_cosp_constants::rttov_max_channels = 20 |
| |
| real, dimension(7), parameter | mod_cosp_constants::isccp_tau = (/0.15, 0.80, 2.45, 6.5, 16.2, 41.5, 50000.0/) |
| |
| real, dimension(2, 7), parameter | mod_cosp_constants::isccp_tau_bnds = reshape(source=(/0.0,0.3,0.3,1.30,1.30,3.6,3.6,9.4, 9.4,23.0,23.0,60.0,60.0,100000.0/), shape=(/2,7/)) |
| |
| real, dimension(7), parameter | mod_cosp_constants::isccp_pc = (/90000., 74000., 62000., 50000., 37500., 24500., 9000./) |
| |
| real, dimension(2, 7), parameter | mod_cosp_constants::isccp_pc_bnds = reshape(source=(/100000.0,80000.0,80000.0,68000.0,68000.0,56000.0 ,56000.0,44000.0,44000.0,31000.0,31000.0,18000.0,18000.0,0.0/), shape=(/2,7/)) |
| |
| real, dimension(misr_n_cth), parameter | mod_cosp_constants::misr_cth = (/ 0., 0.25, 0.75, 1.25, 1.75, 2.25, 2.75, 3.5, 4.5, 6., 8., 10., 12., 14.5, 16., 18./) |
| |
| real, dimension(2, misr_n_cth), parameter | mod_cosp_constants::misr_cth_bnds = reshape(source=(/ -99.0, 0.0, 0.0, 0.5, 0.5, 1.0, 1.0, 1.5, 1.5, 2.0, 2.0, 2.5, 2.5, 3.0, 3.0, 4.0, 4.0, 5.0, 5.0, 7.0, 7.0, 9.0, 9.0, 11.0, 11.0, 13.0, 13.0, 15.0, 15.0, 17.0, 17.0, 99.0/), shape=(/2,MISR_N_CTH/)) |
| |
| integer, parameter | mod_cosp_constants::n_hydro = 9 |
| |
| real, dimension(n_hydro) | mod_cosp_constants::hclass_type |
| |
| real, dimension(n_hydro) | mod_cosp_constants::hclass_col |
| |
| real, dimension(n_hydro) | mod_cosp_constants::hclass_phase |
| |
| real, dimension(n_hydro) | mod_cosp_constants::hclass_cp |
| |
| real, dimension(n_hydro) | mod_cosp_constants::hclass_dmin |
| |
| real, dimension(n_hydro) | mod_cosp_constants::hclass_dmax |
| |
| real, dimension(n_hydro) | mod_cosp_constants::hclass_apm |
| |
| real, dimension(n_hydro) | mod_cosp_constants::hclass_bpm |
| |
| real, dimension(n_hydro) | mod_cosp_constants::hclass_rho |
| |
| real, dimension(n_hydro) | mod_cosp_constants::hclass_p1 |
| |
| real, dimension(n_hydro) | mod_cosp_constants::hclass_p2 |
| |
| real, dimension(n_hydro) | mod_cosp_constants::hclass_p3 |
| |
1.8.9.1 
