test_cloud_generator Program

Uses

  • program~~test_cloud_generator~~UsesGraph program~test_cloud_generator test_cloud_generator module~parkind1~2 PARKIND1 program~test_cloud_generator->module~parkind1~2 module~radiation_pdf_sampler~2 radiation_pdf_sampler program~test_cloud_generator->module~radiation_pdf_sampler~2 module~radiation_cloud_cover radiation_cloud_cover program~test_cloud_generator->module~radiation_cloud_cover module~radiation_cloud_generator radiation_cloud_generator program~test_cloud_generator->module~radiation_cloud_generator module~radiation_pdf_sampler~2->module~parkind1~2 module~radiation_cloud_cover->module~parkind1~2

Calls

program~~test_cloud_generator~~CallsGraph program~test_cloud_generator test_cloud_generator proc~cloud_generator cloud_generator program~test_cloud_generator->proc~cloud_generator proc~cum_cloud_cover_exp_exp cum_cloud_cover_exp_exp proc~cloud_generator->proc~cum_cloud_cover_exp_exp proc~cum_cloud_cover_exp_ran cum_cloud_cover_exp_ran proc~cloud_generator->proc~cum_cloud_cover_exp_ran proc~uniform_distribution UNIFORM_DISTRIBUTION proc~cloud_generator->proc~uniform_distribution proc~initialize_random_numbers INITIALIZE_RANDOM_NUMBERS proc~cloud_generator->proc~initialize_random_numbers proc~dr_hook dr_hook proc~cloud_generator->proc~dr_hook proc~radiation_abort radiation_abort proc~cloud_generator->proc~radiation_abort proc~generate_column_exp_ran generate_column_exp_ran proc~cloud_generator->proc~generate_column_exp_ran proc~generate_column_exp_exp generate_column_exp_exp proc~cloud_generator->proc~generate_column_exp_exp proc~generate_columns_exp_ran generate_columns_exp_ran proc~cloud_generator->proc~generate_columns_exp_ran proc~cum_cloud_cover_max_ran cum_cloud_cover_max_ran proc~cloud_generator->proc~cum_cloud_cover_max_ran proc~cum_cloud_cover_exp_exp->proc~dr_hook proc~beta2alpha beta2alpha proc~cum_cloud_cover_exp_exp->proc~beta2alpha proc~cum_cloud_cover_exp_ran->proc~dr_hook proc~cum_cloud_cover_exp_ran->proc~beta2alpha proc~abor1 ABOR1 proc~uniform_distribution->proc~abor1 proc~initialize_random_numbers->proc~uniform_distribution proc~initialize_random_numbers->proc~dr_hook proc~initialize_random_numbers->proc~abor1 proc~generate_column_exp_ran->proc~uniform_distribution proc~generate_column_exp_exp->proc~uniform_distribution proc~cum_cloud_cover_max_ran->proc~dr_hook

Contents

Variables


Variables

Type Attributes Name Initial
integer, parameter :: ncol = 2000
integer, parameter :: nlev = 137
integer, parameter :: i_overlap_scheme = IOverlapExponential
real(kind=jprb), parameter :: scale_height = 8000.0_jprb
real(kind=jprb), parameter :: cloud_inhom_decorr_scaling = 0.5_jprb
real(kind=jprb), parameter :: frac_threshold = 1.0e-6_jprb
real(kind=jprb) :: cloud_fraction(nlev)
real(kind=jprb) :: overlap_param(nlev-1)
real(kind=jprb) :: fractional_std(nlev)
real(kind=jprb) :: od_scaling(ncol,nlev)
real(kind=jprb) :: total_cloud_cover
integer :: iseed
integer :: jcol
integer :: jlev
type(pdf_sampler_type) :: pdf_sampler