CAM
|
Data Types | |
type | aerlist_t |
type | aerosol_t |
type | gas_t |
type | gaslist_t |
type | mode_component_t |
type | modelist_t |
type | modes_t |
interface | rad_cnst_get_aer_mmr |
interface | rad_cnst_get_aer_props |
interface | rad_cnst_get_info |
type | rad_cnst_namelist_t |
Functions/Subroutines | |
subroutine, public | rad_cnst_readnl (nlfile) |
subroutine, public | rad_cnst_init () |
subroutine, public | rad_cnst_get_gas (list_idx, gasname, state, pbuf, mmr) |
subroutine, public | rad_cnst_get_info (list_idx, gasnames, aernames, use_data_o3, ngas, naero, nmodes) |
subroutine | rad_cnst_get_info_by_mode (list_idx, m_idx, mode_type, num_name, num_name_cw, nspec) |
subroutine | rad_cnst_get_info_by_mode_spec (list_idx, m_idx, s_idx, spec_type, spec_name, spec_name_cw) |
subroutine | rad_cnst_get_info_by_spectype (list_idx, spectype, mode_idx, spec_idx) |
integer function, public | rad_cnst_get_mode_idx (list_idx, mode_type) |
integer function, public | rad_cnst_get_spec_idx (list_idx, mode_idx, spec_type) |
subroutine, public | rad_cnst_get_call_list (call_list) |
subroutine, public | rad_cnst_out (list_idx, state, pbuf) |
subroutine | init_mode_comps (modes) |
integer function | get_cam_idx (source, name, routine) |
subroutine | list_init1 (namelist, gaslist, aerlist, ma_list) |
subroutine | list_init2 (gaslist, aerlist, ma_list) |
subroutine | rad_gas_diag_init (glist) |
subroutine | rad_aer_diag_init (alist) |
subroutine | parse_mode_defs (nl_in, modes) |
subroutine | parse_rad_specifier (specifier, namelist_data) |
subroutine | rad_cnst_get_aer_mmr_by_idx (list_idx, aer_idx, state, pbuf, mmr) |
subroutine | rad_cnst_get_mam_mmr_by_idx (list_idx, mode_idx, spec_idx, phase, state, pbuf, mmr) |
subroutine, public | rad_cnst_get_mam_mmr_idx (mode_idx, spec_idx, idx) |
subroutine, public | rad_cnst_get_mode_num (list_idx, mode_idx, phase, state, pbuf, num) |
subroutine, public | rad_cnst_get_mode_num_idx (mode_idx, cnst_idx) |
integer function | rad_cnst_get_aer_idx (list_idx, aer_name) |
subroutine | rad_cnst_get_aer_props_by_idx (list_idx, aer_idx, opticstype, sw_hygro_ext, sw_hygro_ssa, sw_hygro_asm, lw_hygro_ext, sw_nonhygro_ext, sw_nonhygro_ssa, sw_nonhygro_asm, sw_nonhygro_scat, sw_nonhygro_ascat, lw_ext, refindex_aer_sw, refindex_aer_lw, r_sw_ext, r_sw_scat, r_sw_ascat, r_lw_abs, mu, aername, density_aer, hygro_aer, dryrad_aer, dispersion_aer, num_to_mass_aer) |
subroutine | rad_cnst_get_mam_props_by_idx (list_idx, mode_idx, spec_idx, opticstype, sw_hygro_ext, sw_hygro_ssa, sw_hygro_asm, lw_hygro_ext, sw_nonhygro_ext, sw_nonhygro_ssa, sw_nonhygro_asm, sw_nonhygro_scat, sw_nonhygro_ascat, lw_ext, refindex_aer_sw, refindex_aer_lw, r_sw_ext, r_sw_scat, r_sw_ascat, r_lw_abs, mu, aername, density_aer, hygro_aer, dryrad_aer, dispersion_aer, num_to_mass_aer, spectype) |
subroutine, public | rad_cnst_get_mode_props (list_idx, mode_idx, extpsw, abspsw, asmpsw, absplw, refrtabsw, refitabsw, refrtablw, refitablw, ncoef, prefr, prefi, sigmag, dgnum, dgnumlo, dgnumhi, rhcrystal, rhdeliques) |
subroutine | print_modes (modes) |
subroutine | print_lists (gas_list, aer_list, ma_list) |
Variables | |
integer, parameter | cs1 = 256 |
integer, parameter, public | n_diag = 10 |
character(len=cs1), public | iceopticsfile |
character(len=cs1), public | liqopticsfile |
character(len=32), public | icecldoptics |
character(len=32), public | liqcldoptics |
logical, public | oldcldoptics = .false. |
integer, parameter | n_mode_str = 100 |
integer, parameter | n_rad_cnst = N_RAD_CNST |
character(len=cs1), dimension(n_mode_str) | mode_defs = ' ' |
character(len=cs1), dimension(n_rad_cnst) | rad_climate = ' ' |
character(len=cs1), dimension(n_rad_cnst) | rad_diag_1 = ' ' |
character(len=cs1), dimension(n_rad_cnst) | rad_diag_2 = ' ' |
character(len=cs1), dimension(n_rad_cnst) | rad_diag_3 = ' ' |
character(len=cs1), dimension(n_rad_cnst) | rad_diag_4 = ' ' |
character(len=cs1), dimension(n_rad_cnst) | rad_diag_5 = ' ' |
character(len=cs1), dimension(n_rad_cnst) | rad_diag_6 = ' ' |
character(len=cs1), dimension(n_rad_cnst) | rad_diag_7 = ' ' |
character(len=cs1), dimension(n_rad_cnst) | rad_diag_8 = ' ' |
character(len=cs1), dimension(n_rad_cnst) | rad_diag_9 = ' ' |
character(len=cs1), dimension(n_rad_cnst) | rad_diag_10 = ' ' |
type(modes_t), target | modes |
type(rad_cnst_namelist_t), dimension(0:n_diag) | namelist |
logical, dimension(0:n_diag) | active_calls |
type(gaslist_t), dimension(0:n_diag), target | gaslist |
type(aerlist_t), dimension(0:n_diag), target | aerosollist |
type(modelist_t), dimension(0:n_diag), target | ma_list |
real(r8), dimension(:,:), allocatable, target | zero_cols |
logical | verbose = .true. |
character(len=1), parameter | nl = achar(10) |
integer, parameter | num_mode_types = 8 |
integer, parameter | num_spec_types = 9 |
character(len=14), dimension(num_mode_types), parameter | mode_type_names = (/ 'accum ', 'aitken ', 'primary_carbon', 'fine_seasalt ', 'fine_dust ', 'coarse ', 'coarse_seasalt', 'coarse_dust ' /) |
character(len=9), dimension(num_spec_types), parameter | spec_type_names = (/ 'sulfate ', 'ammonium ', 'nitrate ', 'p-organic', 's-organic', 'black-c ', 'seasalt ', 'dust ', 'm-organic' /) |
|
private |
|
private |
|
private |
|
private |
|
private |
|
private |
|
private |
subroutine rad_constituents::print_modes | ( | type(modes_t), intent(inout) | modes | ) |
|
private |
|
private |
|
private |
|
private |
subroutine, public rad_constituents::rad_cnst_get_call_list | ( | logical, dimension(0:n_diag), intent(out) | call_list | ) |
subroutine, public rad_constituents::rad_cnst_get_gas | ( | integer, intent(in) | list_idx, |
character(len=*), intent(in) | gasname, | ||
type(physics_state), intent(in), target | state, | ||
type(physics_buffer_desc), dimension(:), pointer | pbuf, | ||
real(r8), dimension(:,:), pointer | mmr | ||
) |
subroutine, public rad_constituents::rad_cnst_get_info | ( | integer, intent(in) | list_idx, |
character(len=64), dimension(:), intent(out), optional | gasnames, | ||
character(len=64), dimension(:), intent(out), optional | aernames, | ||
logical, intent(out), optional | use_data_o3, | ||
integer, intent(out), optional | ngas, | ||
integer, intent(out), optional | naero, | ||
integer, intent(out), optional | nmodes | ||
) |
|
private |
|
private |
|
private |
|
private |
subroutine, public rad_constituents::rad_cnst_get_mam_mmr_idx | ( | integer, intent(in) | mode_idx, |
integer, intent(in) | spec_idx, | ||
integer, intent(out) | idx | ||
) |
subroutine rad_constituents::rad_cnst_get_mam_props_by_idx | ( | integer, intent(in) | list_idx, |
integer, intent(in) | mode_idx, | ||
integer, intent(in) | spec_idx, | ||
character(len=ot_length), intent(out), optional | opticstype, | ||
real(r8), dimension(:,:), optional, pointer | sw_hygro_ext, | ||
real(r8), dimension(:,:), optional, pointer | sw_hygro_ssa, | ||
real(r8), dimension(:,:), optional, pointer | sw_hygro_asm, | ||
real(r8), dimension(:,:), optional, pointer | lw_hygro_ext, | ||
real(r8), dimension(:), optional, pointer | sw_nonhygro_ext, | ||
real(r8), dimension(:), optional, pointer | sw_nonhygro_ssa, | ||
real(r8), dimension(:), optional, pointer | sw_nonhygro_asm, | ||
real(r8), dimension(:), optional, pointer | sw_nonhygro_scat, | ||
real(r8), dimension(:), optional, pointer | sw_nonhygro_ascat, | ||
real(r8), dimension(:), optional, pointer | lw_ext, | ||
complex(r8), dimension(:), optional, pointer | refindex_aer_sw, | ||
complex(r8), dimension(:), optional, pointer | refindex_aer_lw, | ||
real(r8), dimension(:,:), optional, pointer | r_sw_ext, | ||
real(r8), dimension(:,:), optional, pointer | r_sw_scat, | ||
real(r8), dimension(:,:), optional, pointer | r_sw_ascat, | ||
real(r8), dimension(:,:), optional, pointer | r_lw_abs, | ||
real(r8), dimension(:), optional, pointer | mu, | ||
character(len=20), intent(out), optional | aername, | ||
real(r8), intent(out), optional | density_aer, | ||
real(r8), intent(out), optional | hygro_aer, | ||
real(r8), intent(out), optional | dryrad_aer, | ||
real(r8), intent(out), optional | dispersion_aer, | ||
real(r8), intent(out), optional | num_to_mass_aer, | ||
character(len=32), intent(out), optional | spectype | ||
) |
integer function, public rad_constituents::rad_cnst_get_mode_idx | ( | integer, intent(in) | list_idx, |
character(len=*), intent(in) | mode_type | ||
) |
subroutine, public rad_constituents::rad_cnst_get_mode_num | ( | integer, intent(in) | list_idx, |
integer, intent(in) | mode_idx, | ||
character(len=1), intent(in) | phase, | ||
type(physics_state), intent(in), target | state, | ||
type(physics_buffer_desc), dimension(:), pointer | pbuf, | ||
real(r8), dimension(:,:), pointer | num | ||
) |
subroutine, public rad_constituents::rad_cnst_get_mode_num_idx | ( | integer, intent(in) | mode_idx, |
integer, intent(out) | cnst_idx | ||
) |
subroutine, public rad_constituents::rad_cnst_get_mode_props | ( | integer, intent(in) | list_idx, |
integer, intent(in) | mode_idx, | ||
real(r8), dimension(:,:,:,:), optional, pointer | extpsw, | ||
real(r8), dimension(:,:,:,:), optional, pointer | abspsw, | ||
real(r8), dimension(:,:,:,:), optional, pointer | asmpsw, | ||
real(r8), dimension(:,:,:,:), optional, pointer | absplw, | ||
real(r8), dimension(:,:), optional, pointer | refrtabsw, | ||
real(r8), dimension(:,:), optional, pointer | refitabsw, | ||
real(r8), dimension(:,:), optional, pointer | refrtablw, | ||
real(r8), dimension(:,:), optional, pointer | refitablw, | ||
integer, intent(out), optional | ncoef, | ||
integer, intent(out), optional | prefr, | ||
integer, intent(out), optional | prefi, | ||
real(r8), intent(out), optional | sigmag, | ||
real(r8), intent(out), optional | dgnum, | ||
real(r8), intent(out), optional | dgnumlo, | ||
real(r8), intent(out), optional | dgnumhi, | ||
real(r8), intent(out), optional | rhcrystal, | ||
real(r8), intent(out), optional | rhdeliques | ||
) |
integer function, public rad_constituents::rad_cnst_get_spec_idx | ( | integer, intent(in) | list_idx, |
integer, intent(in) | mode_idx, | ||
character(len=*), intent(in) | spec_type | ||
) |
subroutine, public rad_constituents::rad_cnst_init | ( | ) |
subroutine, public rad_constituents::rad_cnst_out | ( | integer, intent(in) | list_idx, |
type(physics_state), intent(in), target | state, | ||
type(physics_buffer_desc), dimension(:), pointer | pbuf | ||
) |
subroutine, public rad_constituents::rad_cnst_readnl | ( | character(len=*), intent(in) | nlfile | ) |
|
private |
|
private |
|
private |
character(len=32), public rad_constituents::icecldoptics |
character(len=cs1), public rad_constituents::iceopticsfile |
character(len=32), public rad_constituents::liqcldoptics |
character(len=cs1), public rad_constituents::liqopticsfile |
|
private |
|
private |
|
private |
|
private |
integer, parameter, public rad_constituents::n_diag = 10 |
|
private |
|
private |
|
private |
|
private |
|
private |
|
private |
logical, public rad_constituents::oldcldoptics = .false. |
|
private |
|
private |
|
private |
|
private |
|
private |
|
private |
|
private |
|
private |
|
private |
|
private |
|
private |
|
private |
|
private |
|
private |