Index | Rundeck: P1SoM40 | Created: Mon May 20 03:30:14 EDT 2024 |
RAD_PCF | File: rad_pcf.F90 |
Author :
Version:
Subroutines:
Global Variables:
- ip_aerosol_param_dry :
integer, parameter
- Initial Value
= 1
- ip_aerosol_param_moist :
integer, parameter
- Initial Value
= 2
- ip_aerosol_unparametrized :
integer, parameter
- Initial Value
= 3
- ip_aerosol_param_phf_dry :
integer, parameter
- Initial Value
= 4
- ip_aerosol_param_phf_moist :
integer, parameter
- Initial Value
= 5
- npd_aerosol_component :
integer, parameter
- Initial Value
= 32
- ip_water_soluble :
integer, parameter
- Initial Value
= 1
- ip_dust_like :
integer, parameter
- Initial Value
= 2
- ip_oceanic :
integer, parameter
- Initial Value
= 3
- ip_soot :
integer, parameter
- Initial Value
= 4
- ip_ash :
integer, parameter
- Initial Value
= 5
- ip_sulphuric :
integer, parameter
- Initial Value
= 6
- ip_ammonium_sulphate :
integer, parameter
- Initial Value
= 7
- ip_aerosol_uncharacterized :
integer, parameter
- Initial Value
= 8
- ip_saharan_dust :
integer, parameter
- Initial Value
= 9
- ip_accum_sulphate :
integer, parameter
- Initial Value
= 10
- ip_aitken_sulphate :
integer, parameter
- Initial Value
= 11
- ip_fresh_soot :
integer, parameter
- Initial Value
= 12
- ip_aged_soot :
integer, parameter
- Initial Value
= 13
- ip_sodium_chloride :
integer, parameter
- Initial Value
= 14
- ip_seasalt_film :
integer, parameter
- Initial Value
= 15
- ip_seasalt_jet :
integer, parameter
- Initial Value
= 16
- ip_dust_div1 :
integer, parameter
- Initial Value
= 17
- ip_dust_div2 :
integer, parameter
- Initial Value
= 18
- ip_dust_div3 :
integer, parameter
- Initial Value
= 19
- ip_dust_div4 :
integer, parameter
- Initial Value
= 20
- ip_dust_div5 :
integer, parameter
- Initial Value
= 21
- ip_dust_div6 :
integer, parameter
- Initial Value
= 22
- ip_biomass_1 :
integer, parameter
- Initial Value
= 23
- ip_biomass_2 :
integer, parameter
- Initial Value
= 24
- ip_biogenic :
integer, parameter
- Initial Value
= 25
- ip_ocff_fresh :
integer, parameter
- Initial Value
= 26
- ip_ocff_aged :
integer, parameter
- Initial Value
= 27
- ip_delta :
integer, parameter
- Initial Value
= 28
- ip_murk :
integer, parameter
- Initial Value
= 29
- ip_nitrate :
integer, parameter
- Initial Value
= 30
- ip_twobindust_1 :
integer, parameter
- Initial Value
= 31
- ip_twobindust_2 :
integer, parameter
- Initial Value
= 32
- ip_aersrc_cusack_ron :
integer, parameter
- Initial Value
= 0
- ip_aersrc_cusack_roff :
integer, parameter
- Initial Value
= 10
- ip_aersrc_classic_ron :
integer, parameter
- Initial Value
= 1
- ip_aersrc_classic_roff :
integer, parameter
- Initial Value
= 11
- ip_aersrc_arcl_ron :
integer, parameter
- Initial Value
= 2
- ip_aersrc_arcl_roff :
integer, parameter
- Initial Value
= 12
- ip_two_stream :
integer, parameter
- Initial Value
= 1
- ip_ir_gauss :
integer, parameter
- Initial Value
= 2
- ip_spherical_harmonic :
integer, parameter
- Initial Value
= 3
- ip_clcmp_st_water :
integer, parameter
- Initial Value
= 1
- ip_clcmp_st_ice :
integer, parameter
- Initial Value
= 2
- ip_clcmp_cnv_water :
integer, parameter
- Initial Value
= 3
- ip_clcmp_cnv_ice :
integer, parameter
- Initial Value
= 4
- ip_slingo_schrecker :
integer, parameter
- Initial Value
= 1
- ip_ackerman_stephens :
integer, parameter
- Initial Value
= 2
- ip_drop_unparametrized :
integer, parameter
- Initial Value
= 3
- ip_drop_pade_2 :
integer, parameter
- Initial Value
= 5
- ip_slingo_schr_phf :
integer, parameter
- Initial Value
= 6
- ip_drop_pade_2_phf :
integer, parameter
- Initial Value
= 7
- ip_ps_size_phf :
integer, parameter
- Initial Value
= 8
- ip_drop_sun_shine_vis :
integer, parameter
- Initial Value
= 10
- ip_drop_stamnes :
integer, parameter
- Initial Value
= 11
- ip_region_clear :
integer, parameter
- Initial Value
= 1
- ip_region_strat :
integer, parameter
- Initial Value
= 2
- ip_region_conv :
integer, parameter
- Initial Value
= 3
- ip_cloud_homogen :
integer, parameter
- Initial Value
= 1
Used by: | :mcica_sample |
- ip_cloud_ice_water :
integer, parameter
- Initial Value
= 2
Used by: | :mcica_sample |
- ip_cloud_conv_strat :
integer, parameter
- Initial Value
= 3
- ip_cloud_csiw :
integer, parameter
- Initial Value
= 4
- ip_cloud_off :
integer, parameter
- Initial Value
= 5
- ip_homogeneous :
integer, parameter
- Initial Value
= 0
- ip_scaling :
integer, parameter
- Initial Value
= 1
- ip_mcica :
integer, parameter
- Initial Value
= 2
- ip_cairns :
integer, parameter
- Initial Value
= 3
- ip_max_rand :
integer, parameter
- Initial Value
= 0
- ip_rand :
integer, parameter
- Initial Value
= 1
- ip_exponential :
integer, parameter
- Initial Value
= 2
- ip_exponential_rand :
integer, parameter
- Initial Value
= 3
- ip_cloud_mix_max :
integer, parameter
- Initial Value
= 2
- ip_cloud_mix_random :
integer, parameter
- Initial Value
= 4
- ip_cloud_column_max :
integer, parameter
- Initial Value
= 3
- ip_cloud_clear :
integer, parameter
- Initial Value
= 5
- ip_cloud_triple :
integer, parameter
- Initial Value
= 6
- ip_cloud_part_corr :
integer, parameter
- Initial Value
= 7
- ip_cloud_part_corr_cnv :
integer, parameter
- Initial Value
= 8
- ip_cloud_mcica :
integer, parameter
- Initial Value
= 10
- ip_cloud_type_homogen :
integer, parameter
- Initial Value
= 1
- ip_cloud_type_water :
integer, parameter
- Initial Value
= 1
- ip_cloud_type_ice :
integer, parameter
- Initial Value
= 2
- ip_cloud_type_strat :
integer, parameter
- Initial Value
= 1
- ip_cloud_type_conv :
integer, parameter
- Initial Value
= 2
- ip_cloud_type_sw :
integer, parameter
- Initial Value
= 1
- ip_cloud_type_si :
integer, parameter
- Initial Value
= 2
- ip_cloud_type_cw :
integer, parameter
- Initial Value
= 3
- ip_cloud_type_ci :
integer, parameter
- Initial Value
= 4
- ip_self_continuum :
integer, parameter
- Initial Value
= 1
- ip_frn_continuum :
integer, parameter
- Initial Value
= 2
- ip_n2_continuum :
integer, parameter
- Initial Value
= 3
- ip_cont_h2o :
integer, parameter
- Initial Value
= 1
Used by: | :inter_k | :ses_rescale_contm |
- ip_cont_o4 :
integer, parameter
- Initial Value
= 2
Used by: | :ses_rescale_contm |
- ip_cont_o2n2_1 :
integer, parameter
- Initial Value
= 3
- ip_cont_o2n2_2 :
integer, parameter
- Initial Value
= 4
Used by: | :inter_k |
- i_normal :
integer, parameter
- Initial Value
= 0
Used by: | :quicksort |
- i_err_fatal :
integer, parameter
- Initial Value
= 1
Used by: | :calc_gauss_weight_90 | :quicksort |
- i_abort_calculation :
integer, parameter
- Initial Value
= 2
- i_missing_data :
integer, parameter
- Initial Value
= 3
- i_err_io :
integer, parameter
- Initial Value
= 4
- i_err_range :
integer, parameter
- Initial Value
= 5
Used by: | :spline_evaluate |
- i_err_exist :
integer, parameter
- Initial Value
= 6
- i_warning :
integer, parameter
- Initial Value
= -1
Used by: | :eigenvalue_tri |
- ip_scale_null :
integer, parameter
- Initial Value
= 0
- ip_scale_band :
integer, parameter
- Initial Value
= 1
- ip_scale_term :
integer, parameter
- Initial Value
= 2
- ip_overlap_single :
integer, parameter
- Initial Value
= 1
- ip_overlap_random :
integer, parameter
- Initial Value
= 2
- ip_overlap_k_eqv_scl :
integer, parameter
- Initial Value
= 4
- ip_overlap_k_eqv :
integer, parameter
- Initial Value
= 5
- ip_overlap_k_eqv_mod :
integer, parameter
- Initial Value
= 6
- ip_overlap_mix_ses2 :
integer, parameter
- Initial Value
= 7
- ip_overlap_random_resort_rebin :
integer, parameter
- Initial Value
= 8
- ip_slingo_schrecker_ice :
integer, parameter
- Initial Value
= 1
- ip_ice_unparametrized :
integer, parameter
- Initial Value
= 3
- ip_sun_shine_vn2_vis :
integer, parameter
- Initial Value
= 4
- ip_sun_shine_vn2_ir :
integer, parameter
- Initial Value
= 5
- ip_ice_adt :
integer, parameter
- Initial Value
= 6
- ip_ice_adt_10 :
integer, parameter
- Initial Value
= 7
- ip_ice_fu_solar :
integer, parameter
- Initial Value
= 9
- ip_ice_fu_ir :
integer, parameter
- Initial Value
= 10
- ip_slingo_schr_ice_phf :
integer, parameter
- Initial Value
= 11
- ip_ice_agg_de :
integer, parameter
- Initial Value
= 12
- ip_ice_fu_phf :
integer, parameter
- Initial Value
= 12
- ip_ice_sun_fu :
integer, parameter
- Initial Value
= 14
- ip_ice_chou_vis :
integer, parameter
- Initial Value
= 15
- ip_ice_agg_de_sun :
integer, parameter
- Initial Value
= 16
- ip_ice_t_iwc :
integer, parameter
- Initial Value
= 17
- ip_ice_iwc_only :
integer, parameter
- Initial Value
= 18
- ip_ice_baran :
integer, parameter
- Initial Value
= 19
- ip_phase_water :
integer, parameter
- Initial Value
= 1
- ip_phase_ice :
integer, parameter
- Initial Value
= 2
- npd_scale_fnc :
integer, parameter
- Initial Value
= 10
- n_scale_variable :
integer, parameter, dimension(0: npd_scale_fnc)
- Initial Value
= &
- ip_scale_fnc_null :
integer, parameter
- Initial Value
= 0
- ip_scale_power_law :
integer, parameter
- Initial Value
= 1
- ip_scale_power_quad :
integer, parameter
- Initial Value
= 2
- ip_scale_doppler_quad :
integer, parameter
- Initial Value
= 3
- ip_scale_wenyi :
integer, parameter
- Initial Value
= 4
- ip_scale_ses2 :
integer, parameter
- Initial Value
= 5
- ip_scale_dbl_pow_law :
integer, parameter
- Initial Value
= 6
- ip_scale_dbl_pow_quad :
integer, parameter
- Initial Value
= 7
- ip_scale_dbl_dop_quad :
integer, parameter
- Initial Value
= 8
- ip_scale_lookup :
integer, parameter
- Initial Value
= 9
- ip_scale_t_lookup :
integer, parameter
- Initial Value
= 10
- ip_scatter_full :
integer, parameter
- Initial Value
= 1
- ip_no_scatter_abs :
integer, parameter
- Initial Value
= 2
- ip_no_scatter_ext :
integer, parameter
- Initial Value
= 3
- ip_scatter_approx :
integer, parameter
- Initial Value
= 4
- ip_scatter_hybrid :
integer, parameter
- Initial Value
= 5
- ip_solver_pentadiagonal :
integer, parameter
- Initial Value
= 1
- ip_solver_no_scat :
integer, parameter
- Initial Value
= 2
- ip_solver_mix_app_scat :
integer, parameter
- Initial Value
= 9
- ip_solver_mix_direct :
integer, parameter
- Initial Value
= 11
- ip_solver_homogen_direct :
integer, parameter
- Initial Value
= 13
- ip_solver_triple :
integer, parameter
- Initial Value
= 14
- ip_solver_triple_app_scat :
integer, parameter
- Initial Value
= 15
- ip_solver_mix_direct_hogan :
integer, parameter
- Initial Value
= 16
- ip_solver_triple_hogan :
integer, parameter
- Initial Value
= 17
- ip_scf_solar_up :
integer, parameter
- Initial Value
= 1
- ip_scf_solar_down :
integer, parameter
- Initial Value
= 2
- ip_scf_ir_1d :
integer, parameter
- Initial Value
= 1
- ip_scf_ir_2d :
integer, parameter
- Initial Value
= 2
- ip_solar :
integer, parameter
- Initial Value
= 1
Used by: | :mcica_sample | SET_N_SOURCE_COEFF_MOD:set_n_source_coeff |
- ip_infra_red :
integer, parameter
- Initial Value
= 2
- ip_sph_direct :
integer, parameter
- Initial Value
= 1
- ip_sph_reduced_iter :
integer, parameter
- Initial Value
= 2
- ip_sph_mode_rad :
integer, parameter
- Initial Value
= 1
- ip_sph_mode_flux :
integer, parameter
- Initial Value
= 2
- ip_sph_mode_j :
integer, parameter
- Initial Value
= 3
- ip_trunc_triangular :
integer, parameter
- Initial Value
= 1
- ip_trunc_rhombohedral :
integer, parameter
- Initial Value
= 2
- ip_trunc_azim_sym :
integer, parameter
- Initial Value
= 3
- ip_trunc_adaptive :
integer, parameter
- Initial Value
= 4
- ip_surface_specified :
integer, parameter
- Initial Value
= 1
- ip_surface_internal :
integer, parameter
- Initial Value
= 2
- ip_surface_polynomial :
integer, parameter
- Initial Value
= 3
- ip_surface_payne :
integer, parameter
- Initial Value
= 4
- ip_surface_lambertian :
integer, parameter
- Initial Value
= 5
- ip_surface_roujean :
integer, parameter
- Initial Value
= 6
- ip_surface_lommel_seeliger_axi :
integer, parameter
- Initial Value
= 7
- ip_surf_alb_diff :
integer, parameter
- Initial Value
= 1
- ip_surf_alb_dir :
integer, parameter
- Initial Value
= 2
- ip_ocean_tile :
integer, parameter
- Initial Value
= 1
- ip_seaice_tile :
integer, parameter
- Initial Value
= 2
- ip_land_tile :
integer, parameter
- Initial Value
= 3
- ip_landice_tile :
integer, parameter
- Initial Value
= 4
- ip_eddington :
integer, parameter
- Initial Value
= 2
- ip_discrete_ord :
integer, parameter
- Initial Value
= 4
- ip_ifm :
integer, parameter
- Initial Value
= 5
- ip_pifm85 :
integer, parameter
- Initial Value
= 6
- ip_zdk_flux :
integer, parameter
- Initial Value
= 7
- ip_krschg_flux :
integer, parameter
- Initial Value
= 8
- ip_coakley_chylek_1 :
integer, parameter
- Initial Value
= 9
- ip_coakley_chylek_2 :
integer, parameter
- Initial Value
= 10
- ip_meador_weaver :
integer, parameter
- Initial Value
= 11
- ip_elsasser :
integer, parameter
- Initial Value
= 12
- ip_2s_test :
integer, parameter
- Initial Value
= 14
- ip_hemi_mean :
integer, parameter
- Initial Value
= 15
- ip_pifm80 :
integer, parameter
- Initial Value
= 16
- ip_rayleigh_total :
integer, parameter
- Initial Value
= 1
- ip_rayleigh_custom :
integer, parameter
- Initial Value
= 2