Functions | |
subroutine | nc_check (status) |
Check return status of NetCDF function calls. | |
Variables | |
integer, parameter | MAX_N_TIME = 10000 |
integer, parameter | out_unit = 64 |
character(len=1000) | in_prefix |
character(len=1000) | in_filename |
character(len=1000) | out_filename |
integer | ncid |
integer | dimid_aero_species |
integer | dimid_aero_radius |
integer | varid_time |
integer | varid_aero_species |
integer | varid_aero_radius |
integer | varid_aero_radius_widths |
integer | varid_aero_mass_concentration |
integer | n_aero_species |
integer | n_bin |
character(len=1000) | tmp_str |
character(len=1000) | aero_species_names |
real *8 | time |
real *8, dimension(:,:), allocatable | aero_dist |
real *8, dimension(:), allocatable | aero_radius |
real *8, dimension(:), allocatable | aero_radius_widths |
real *8, dimension(:,:), allocatable | aero_mass_concentration |
real *8, dimension(:), allocatable | save_aero_radius |
integer | xtype |
integer | ndims |
integer | nAtts |
integer, dimension(nf90_max_var_dims) | dimids |
integer | ios |
integer | i_time |
integer | i_spec |
integer | i_part |
integer | status |
integer | i_bin |
integer | n_time |
integer | new_n_bin |
real *8 | dlnr |
subroutine extract_sectional_aero_size_mass::nc_check | ( | integer,intent(in) | status | ) |
Check return status of NetCDF function calls.
status | Status return value. |
real*8,dimension(:,:),allocatable extract_sectional_aero_size_mass::aero_dist |
real*8,dimension(:,:),allocatable extract_sectional_aero_size_mass::aero_mass_concentration |
real*8,dimension(:),allocatable extract_sectional_aero_size_mass::aero_radius |
real*8,dimension(:),allocatable extract_sectional_aero_size_mass::aero_radius_widths |
character(len=1000) extract_sectional_aero_size_mass::aero_species_names |
integer,dimension(nf90_max_var_dims) extract_sectional_aero_size_mass::dimids |
character(len=1000) extract_sectional_aero_size_mass::in_filename |
character(len=1000) extract_sectional_aero_size_mass::in_prefix |
integer,parameter extract_sectional_aero_size_mass::MAX_N_TIME = 10000 |
character(len=1000) extract_sectional_aero_size_mass::out_filename |
integer,parameter extract_sectional_aero_size_mass::out_unit = 64 |
real*8,dimension(:),allocatable extract_sectional_aero_size_mass::save_aero_radius |
character(len=1000) extract_sectional_aero_size_mass::tmp_str |