m_gas.f90 File Reference

Go to the source code of this file.

Modules
module	m_gas
	Module that stores parameters related to the gas.

Functions/Subroutines
subroutine, public	m_gas::gas_initialize (tree, cfg)
	Initialize this module.
subroutine, public	m_gas::gas_forward_euler (tree, dt, dt_stiff, dt_lim, time, s_deriv, n_prev, s_prev, w_prev, s_out, i_step, n_steps)
	A forward-Euler method for the Euler equations.
elemental integer function, public	m_gas::gas_index (name)
	Find index of a gas component, return -1 if not found.

Variables
logical, public, protected	m_gas::gas_constant_density = .true.
	Whether the gas has a constant density.
logical, public, protected	m_gas::gas_dynamics = .false.
	Whether the gas dynamics are simulated.
real(dp), public, protected	m_gas::gas_pressure = 1.0_dp
real(dp), public, protected	m_gas::gas_temperature = 300.0_dp
real(dp), dimension(:), allocatable, public, protected	m_gas::gas_fractions
real(dp), dimension(:), allocatable, public, protected	m_gas::gas_densities
character(len=comp_len), dimension(:), allocatable, public, protected	m_gas::gas_components
real(dp), public, protected	m_gas::gas_number_density
real(dp), public, protected	m_gas::gas_inverse_number_density
real(dp), parameter, public	m_gas::si_to_townsend = 1e21_dp
real(dp), parameter, public	m_gas::townsend_to_si = 1e-21_dp
integer, public, protected	m_gas::i_gas_dens = -1
real(dp), public, protected	m_gas::gas_molecular_weight = 28.8_dp * UC_atomic_mass
real(dp), public, protected	m_gas::gas_vt_time = 20e-6_dp
	Vibration-Translation relaxation time (s)
real(dp), public, protected	m_gas::gas_heating_efficiency = 1.0_dp
real(dp), public, protected	m_gas::gas_fraction_slow_heating = 0.0_dp
real(dp), public, protected	m_gas::gas_ehd_factor = 1.0_dp
real(dp), public, protected	m_gas::gas_euler_gamma = 1.4_dp
integer, parameter, public	m_gas::n_vars_euler = 2+NDIM
integer, dimension(n_vars_euler), public, protected	m_gas::gas_vars = -1
integer, dimension(n_vars_euler+1), public, protected	m_gas::gas_prim_vars = -1
integer, dimension(n_vars_euler), public, protected	m_gas::gas_fluxes = -1
integer, public, protected	m_gas::i_vibration_energy = -1
character(len=name_len), dimension(n_vars_euler), public, protected	m_gas::gas_var_names
integer, parameter, public	m_gas::i_rho = 1
integer, dimension(ndim), parameter, public	m_gas::i_mom = [2]
integer, parameter, public	m_gas::i_e = i_mom(NDIM) + 1