Functions | |
subroutine | output_processed_open (prefix, i_loop, ncid) |
Open the processed state output file. | |
subroutine | output_processed_close (ncid) |
Close the processed state output file. | |
subroutine | output_processed (ncid, process_spec_list, bin_grid, aero_data, aero_state, gas_data, gas_state, env_state, index, time, del_t, i_loop) |
Write the current processed state. | |
subroutine | output_processed_binned (ncid, process_spec_list, bin_grid, aero_data, aero_binned, gas_data, gas_state, env_state, index, time, del_t) |
Write the current binned data. | |
subroutine | ensure_nc_dim_time (ncid, dimid_time) |
Write the time dimension to the given NetCDF file if it is not already present and in any case return the associated dimid. | |
subroutine | ensure_nc_dim_radius (ncid, bin_grid, dimid_radius) |
Write the radius dimension to the given NetCDF file if it is not already present and in any case return the associated dimid. | |
subroutine | ensure_nc_dim_aero_species (ncid, aero_data, dimid_aero_species) |
Write the aero species dimension to the given NetCDF file if it is not already present and in any case return the associated dimid. | |
subroutine | ensure_nc_dim_gas_species (ncid, gas_data, dimid_gas_species) |
Write the gas species dimension to the given NetCDF file if it is not already present and in any case return the associated dimid. | |
subroutine | ensure_nc_dim_unit (ncid, dimid_unit) |
Write the unit dimension to the given NetCDF file if it is not already present and in any case return the associated dimid. | |
subroutine | ensure_nc_dim_env (ncid, dimid_env) |
Write the env dimension to the given NetCDF file if it is not already present and in any case return the associated dimid. | |
subroutine | ensure_nc_dim_step (ncid, process_spec, dimid_step) |
Write the step dimension for the given process_spec to the given NetCDF file if it is not already present and in any case return the associated dimid. | |
subroutine | ensure_nc_var_env_state (ncid, varid_env_state) |
subroutine | ensure_nc_var_gas (ncid, gas_data, varid_gas) |
subroutine | ensure_nc_var_aero (ncid, bin_grid, aero_data, varid_aero) |
subroutine | ensure_nc_var_hist (ncid, process_spec, bin_grid, aero_data, varid_hist) |
subroutine | process_time (ncid, time, index, del_t) |
subroutine | process_env (ncid, suffix, time, index, env_state) |
subroutine | process_gas (ncid, suffix, time, index, gas_data, gas_state) |
subroutine | output_aero (ncid, suffix, time, index, bin_grid, aero_data, aero_binned) |
subroutine | process_aero (ncid, suffix, time, index, bin_grid, aero_data, aero_state) |
subroutine | output_hist (ncid, time, index, bin_grid, aero_data, process_spec, hist) |
subroutine | process_hist_new (ncid, time, index, bin_grid, env_state, aero_data, aero_state, process_spec) |
Compute histogram by calling the step_comp() function on each particle. | |
real *8 | aero_particle_comp (aero_particle, a_species, b_species) |
real*8 pmc_output_processed::aero_particle_comp | ( | type(aero_particle_t),intent(in) | aero_particle, | |
integer,dimension(:),intent(in) | a_species, | |||
integer,dimension(:),intent(in) | b_species | |||
) |
aero_particle | Particle. |
a_species | First list of species. |
b_species | Second list of species. |
subroutine pmc_output_processed::ensure_nc_dim_aero_species | ( | integer,intent(in) | ncid, | |
type(aero_data_t),intent(in) | aero_data, | |||
integer,intent(out) | dimid_aero_species | |||
) |
Write the aero species dimension to the given NetCDF file if it is not already present and in any case return the associated dimid.
ncid | NetCDF file ID, in data mode. |
aero_data | Aero_data structure. |
dimid_aero_species | Dimid of the species dimension. |
subroutine pmc_output_processed::ensure_nc_dim_env | ( | integer,intent(in) | ncid, | |
integer,intent(out) | dimid_env | |||
) |
Write the env dimension to the given NetCDF file if it is not already present and in any case return the associated dimid.
ncid | NetCDF file ID, in data mode. |
dimid_env | Dimid of the env dimension. |
subroutine pmc_output_processed::ensure_nc_dim_gas_species | ( | integer,intent(in) | ncid, | |
type(gas_data_t),intent(in) | gas_data, | |||
integer,intent(out) | dimid_gas_species | |||
) |
Write the gas species dimension to the given NetCDF file if it is not already present and in any case return the associated dimid.
ncid | NetCDF file ID, in data mode. |
gas_data | Gas_data structure. |
dimid_gas_species | Dimid of the species dimension. |
subroutine pmc_output_processed::ensure_nc_dim_radius | ( | integer,intent(in) | ncid, | |
type(bin_grid_t),intent(in) | bin_grid, | |||
integer,intent(out) | dimid_radius | |||
) |
Write the radius dimension to the given NetCDF file if it is not already present and in any case return the associated dimid.
ncid | NetCDF file ID, in data mode. |
bin_grid | Bin_grid structure. |
dimid_radius | Dimid of the radius dimension. |
subroutine pmc_output_processed::ensure_nc_dim_step | ( | integer,intent(in) | ncid, | |
type(process_spec_t),intent(in) | process_spec, | |||
integer,intent(out) | dimid_step | |||
) |
Write the step dimension for the given process_spec to the given NetCDF file if it is not already present and in any case return the associated dimid.
ncid | NetCDF file ID, in data mode. |
process_spec | Process spec. |
dimid_step | Dimid of the step dimension. |
subroutine pmc_output_processed::ensure_nc_dim_time | ( | integer,intent(in) | ncid, | |
integer,intent(out) | dimid_time | |||
) |
Write the time dimension to the given NetCDF file if it is not already present and in any case return the associated dimid.
ncid | NetCDF file ID, in data mode. |
dimid_time | Dimid of the time dimension. |
subroutine pmc_output_processed::ensure_nc_dim_unit | ( | integer,intent(in) | ncid, | |
integer,intent(out) | dimid_unit | |||
) |
Write the unit dimension to the given NetCDF file if it is not already present and in any case return the associated dimid.
ncid | NetCDF file ID, in data mode. |
dimid_unit | Dimid of the unit dimension. |
subroutine pmc_output_processed::ensure_nc_var_aero | ( | integer,intent(in) | ncid, | |
type(bin_grid_t),intent(in) | bin_grid, | |||
type(aero_data_t),intent(in) | aero_data, | |||
integer,intent(out) | varid_aero | |||
) |
ncid | NetCDF file ID, in data mode. |
bin_grid | Bin_grid structure. |
aero_data | Aero_data structure. |
varid_aero | Varid of aero. |
subroutine pmc_output_processed::ensure_nc_var_env_state | ( | integer,intent(in) | ncid, | |
integer,intent(out) | varid_env_state | |||
) |
ncid | NetCDF file ID, in data mode. |
varid_env_state | Varid of env_state. |
subroutine pmc_output_processed::ensure_nc_var_gas | ( | integer,intent(in) | ncid, | |
type(gas_data_t),intent(in) | gas_data, | |||
integer,intent(out) | varid_gas | |||
) |
ncid | NetCDF file ID, in data mode. |
gas_data | Gas data. |
varid_gas | Varid of gas. |
subroutine pmc_output_processed::ensure_nc_var_hist | ( | integer,intent(in) | ncid, | |
type(process_spec_t),intent(in) | process_spec, | |||
type(bin_grid_t),intent(in) | bin_grid, | |||
type(aero_data_t),intent(in) | aero_data, | |||
integer,intent(out) | varid_hist | |||
) |
ncid | NetCDF file ID, in data mode. |
process_spec | Process spec. |
bin_grid | Bin_grid structure. |
aero_data | Aero_data structure. |
varid_hist | Varid of hist. |
subroutine pmc_output_processed::output_aero | ( | integer,intent(in) | ncid, | |
character(len=*),intent(in) | suffix, | |||
real*8,intent(in) | time, | |||
integer,intent(in) | index, | |||
type(bin_grid_t),intent(in) | bin_grid, | |||
type(aero_data_t),intent(in) | aero_data, | |||
type(aero_binned_t),intent(in) | aero_binned | |||
) |
ncid | NetCDF file ID, in data mode. |
suffix | Suffix for the output filename. |
time | Current time (s). |
index | Current index. |
bin_grid | Bin_grid structure. |
aero_data | Aero_data structure. |
aero_binned | Aero_binned structure. |
subroutine pmc_output_processed::output_hist | ( | integer,intent(in) | ncid, | |
real*8,intent(in) | time, | |||
integer,intent(in) | index, | |||
type(bin_grid_t),intent(in) | bin_grid, | |||
type(aero_data_t),intent(in) | aero_data, | |||
type(process_spec_t),intent(in) | process_spec, | |||
real*8,dimension(process_spec%n_step, bin_grid%n_bin, aero_data%n_spec, 4),intent(in) | hist | |||
) |
ncid | NetCDF file ID, in data mode. |
time | Current time (s). |
index | Current index. |
bin_grid | Bin_grid structure. |
aero_data | Aero_data structure. |
process_spec | Process spec. |
hist | Histogram data. |
subroutine pmc_output_processed::output_processed | ( | integer,intent(in) | ncid, | |
type(process_spec_t),dimension(:),intent(in) | process_spec_list, | |||
type(bin_grid_t),intent(in) | bin_grid, | |||
type(aero_data_t),intent(in) | aero_data, | |||
type(aero_state_t),intent(in) | aero_state, | |||
type(gas_data_t),intent(in) | gas_data, | |||
type(gas_state_t),intent(in) | gas_state, | |||
type(env_state_t),intent(in) | env_state, | |||
integer,intent(in) | index, | |||
real*8,intent(in) | time, | |||
real*8,intent(in) | del_t, | |||
integer,intent(in) | i_loop | |||
) |
Write the current processed state.
ncid | NetCDF file ID, in data mode. |
process_spec_list | Process specs. |
bin_grid | Bin grid. |
aero_data | Aerosol data. |
aero_state | Aerosol state. |
gas_data | Gas data. |
gas_state | Gas state. |
env_state | Environment state. |
index | Filename index. |
time | Current time (s). |
del_t | Current output time-step (s). |
i_loop | Current loop number. |
subroutine pmc_output_processed::output_processed_binned | ( | integer,intent(in) | ncid, | |
type(process_spec_t),dimension(:),intent(in) | process_spec_list, | |||
type(bin_grid_t),intent(in) | bin_grid, | |||
type(aero_data_t),intent(in) | aero_data, | |||
type(aero_binned_t),intent(in) | aero_binned, | |||
type(gas_data_t),intent(in) | gas_data, | |||
type(gas_state_t),intent(in) | gas_state, | |||
type(env_state_t),intent(in) | env_state, | |||
integer,intent(in) | index, | |||
real*8,intent(in) | time, | |||
real*8,intent(in) | del_t | |||
) |
Write the current binned data.
ncid | NetCDF file ID, in data mode. |
process_spec_list | Process specs. |
bin_grid | Bin grid. |
aero_data | Aerosol data. |
aero_binned | Binned aerosol data. |
gas_data | Gas data. |
gas_state | Gas state. |
env_state | Environment state. |
index | Filename index. |
time | Current time (s). |
del_t | Current output time-step (s). |
subroutine pmc_output_processed::output_processed_close | ( | integer,intent(out) | ncid | ) |
Close the processed state output file.
ncid | New NetCDF file ID, in data mode. |
subroutine pmc_output_processed::output_processed_open | ( | character(len=*),intent(in) | prefix, | |
integer,intent(in) | i_loop, | |||
integer,intent(out) | ncid | |||
) |
Open the processed state output file.
The filename is of the form prefix_loop.nc
if i_loop
is positive, otherwise it is prefix.nc
.
prefix | Prefix of files to write. |
i_loop | Current loop number, or 0 to ignore the loop number. |
ncid | New NetCDF file ID, in data mode. |
subroutine pmc_output_processed::process_aero | ( | integer,intent(in) | ncid, | |
character(len=*),intent(in) | suffix, | |||
real*8,intent(in) | time, | |||
integer,intent(in) | index, | |||
type(bin_grid_t),intent(in) | bin_grid, | |||
type(aero_data_t),intent(in) | aero_data, | |||
type(aero_state_t),intent(in) | aero_state | |||
) |
ncid | NetCDF file ID, in data mode. |
suffix | Suffix for the output filename. |
time | Current time (s). |
index | Current index. |
bin_grid | Bin_grid structure. |
aero_data | Aero_data structure. |
aero_state | Aero_state structure. |
subroutine pmc_output_processed::process_env | ( | integer,intent(in) | ncid, | |
character(len=*),intent(in) | suffix, | |||
real*8,intent(in) | time, | |||
integer,intent(in) | index, | |||
type(env_state_t),intent(in) | env_state | |||
) |
ncid | NetCDF file ID, in data mode. |
suffix | Suffix of the file. |
time | Current time (s). |
index | Current index. |
env_state | Environment state. |
subroutine pmc_output_processed::process_gas | ( | integer,intent(in) | ncid, | |
character(len=*),intent(in) | suffix, | |||
real*8,intent(in) | time, | |||
integer,intent(in) | index, | |||
type(gas_data_t),intent(in) | gas_data, | |||
type(gas_state_t),intent(in) | gas_state | |||
) |
ncid | NetCDF file ID, in data mode. |
suffix | Suffix of the file. |
time | Current time (s). |
index | Current index. |
gas_data | Gas data. |
gas_state | Gas state. |
subroutine pmc_output_processed::process_hist_new | ( | integer,intent(in) | ncid, | |
real*8,intent(in) | time, | |||
integer,intent(in) | index, | |||
type(bin_grid_t),intent(in) | bin_grid, | |||
type(env_state_t),intent(in) | env_state, | |||
type(aero_data_t),intent(in) | aero_data, | |||
type(aero_state_t),intent(in) | aero_state, | |||
type(process_spec_t),intent(in) | process_spec | |||
) |
Compute histogram by calling the step_comp() function on each particle.
ncid | NetCDF file ID, in data mode. |
time | Current time (s). |
index | Current index. |
bin_grid | Bin grid. |
env_state | Environment state. |
aero_data | Aerosol data. |
aero_state | Aerosol state. |
process_spec | Process spec. |
subroutine pmc_output_processed::process_time | ( | integer,intent(in) | ncid, | |
real*8,intent(in) | time, | |||
integer,intent(in) | index, | |||
real*8,intent(in) | del_t | |||
) |
ncid | NetCDF file ID, in data mode. |
time | Current time (s). |
index | Current index. |
del_t | Output timestep of current time. |