m_global_parameters_common.fpp.f90 File Reference

Contains module m_global_parameters_common. More...

Go to the source code of this file.

Modules
module	m_global_parameters_common
	Shared global parameters and equation-index setup for all three executables. Each per-target m_global_parameters uses this module (default-public, so all symbols re-export to downstream consumers via two-hop use-association).

Functions/Subroutines
impure subroutine	m_global_parameters_common::s_initialize_eqn_idx (nmom_in, nb_in)
	Initialize equation-index state (eqn_idx, sys_size, b_size, tensor_size) from the namelist parameters. This is the shared skeleton: it covers the model_eqns dispatch, all eqn_idx field assignments, and the elasticity/surface-tension/chemistry extensions.
impure subroutine	m_global_parameters_common::s_initialize_parallel_io_common
	Configure MPI parallel I/O settings and allocate processor coordinate arrays. Shared across all three executables; num_dims/num_vels are computed here for pre/post unconditionally and for sim only when not case-optimized (in which case they are compile-time parameters). Callers must have already populated n and p (grid dimensions).
impure subroutine	m_global_parameters_common::s_finalize_global_parameters_common
	Shared finalize core: deallocate proc_coords and start_idx. Per-target finalize routines call this first, then handle their own extras (qbmm_idx, grid arrays, MPI_IO_DATA null/dealloc - those reference per-target typed variables and stay per-target).
impure subroutine	m_global_parameters_common::s_assign_common_defaults
	Assign default values to the user-input parameters that are shared across all three executables (pre_process, simulation, post_process). Per-target defaults (bc_io, cfl_dt, precision, nb, chem_params, bub_pp scalar companions, fluid_pp loop, patch arrays, output flags) remain in the per-target s_assign_default_values_to_user_inputs routines, which call this subroutine first, then call s_update_cell_bounds(cells_bounds, m, n, p) (cells_bounds is per-target), then apply their own assignments.

Variables
real(wp)	m_global_parameters_common::bx0
real(wp)	m_global_parameters_common::ca
logical	m_global_parameters_common::e_wrt
real(wp)	m_global_parameters_common::r0ref
real(wp)	m_global_parameters_common::re_inv
real(wp)	m_global_parameters_common::web
logical	m_global_parameters_common::adv_n
logical, dimension(num_fluids_max)	m_global_parameters_common::alpha_rho_e_wrt
logical, dimension(num_fluids_max)	m_global_parameters_common::alpha_rho_wrt
logical, dimension(num_fluids_max)	m_global_parameters_common::alpha_wrt
logical	m_global_parameters_common::alt_soundspeed
integer	m_global_parameters_common::avg_state
logical	m_global_parameters_common::bubbles_euler
logical	m_global_parameters_common::bubbles_lagrange
logical	m_global_parameters_common::c_wrt
character(len=path_len)	m_global_parameters_common::case_dir
logical	m_global_parameters_common::cf_wrt
logical	m_global_parameters_common::cfl_adap_dt
logical	m_global_parameters_common::cfl_const_dt
real(wp)	m_global_parameters_common::cfl_target
logical	m_global_parameters_common::chem_wrt_t
logical, dimension(num_species)	m_global_parameters_common::chem_wrt_y
logical	m_global_parameters_common::cons_vars_wrt
logical	m_global_parameters_common::cont_damage
logical	m_global_parameters_common::cyl_coord
logical	m_global_parameters_common::down_sample
integer	m_global_parameters_common::fd_order
logical	m_global_parameters_common::fft_wrt
logical	m_global_parameters_common::file_per_process
integer	m_global_parameters_common::flux_lim
logical, dimension(3)	m_global_parameters_common::flux_wrt
integer	m_global_parameters_common::format
logical	m_global_parameters_common::gamma_wrt
logical	m_global_parameters_common::heat_ratio_wrt
logical	m_global_parameters_common::hyper_cleaning
logical	m_global_parameters_common::hyperelasticity
logical	m_global_parameters_common::hypoelasticity
logical	m_global_parameters_common::ib
logical	m_global_parameters_common::ib_state_wrt
logical	m_global_parameters_common::igr
integer	m_global_parameters_common::igr_order
logical	m_global_parameters_common::lag_betac_wrt
logical	m_global_parameters_common::lag_betat_wrt
logical	m_global_parameters_common::lag_db_wrt
logical	m_global_parameters_common::lag_dphidt_wrt
logical	m_global_parameters_common::lag_header
logical	m_global_parameters_common::lag_id_wrt
logical	m_global_parameters_common::lag_mg_wrt
logical	m_global_parameters_common::lag_mv_wrt
logical	m_global_parameters_common::lag_pos_prev_wrt
logical	m_global_parameters_common::lag_pos_wrt
logical	m_global_parameters_common::lag_pres_wrt
logical	m_global_parameters_common::lag_r0_wrt
logical	m_global_parameters_common::lag_rad_wrt
logical	m_global_parameters_common::lag_rmax_wrt
logical	m_global_parameters_common::lag_rmin_wrt
logical	m_global_parameters_common::lag_rvel_wrt
logical	m_global_parameters_common::lag_txt_wrt
logical	m_global_parameters_common::lag_vel_wrt
logical	m_global_parameters_common::liutex_wrt
integer	m_global_parameters_common::m
logical	m_global_parameters_common::mhd
logical	m_global_parameters_common::mixture_err
integer	m_global_parameters_common::model_eqns
logical, dimension(3)	m_global_parameters_common::mom_wrt
logical	m_global_parameters_common::mpp_lim
integer	m_global_parameters_common::muscl_order
integer	m_global_parameters_common::n
integer	m_global_parameters_common::n_start
integer	m_global_parameters_common::nb
integer	m_global_parameters_common::num_bc_patches
integer	m_global_parameters_common::num_fluids
integer	m_global_parameters_common::num_ibs
logical, dimension(3)	m_global_parameters_common::omega_wrt
logical	m_global_parameters_common::output_partial_domain
integer	m_global_parameters_common::p
logical	m_global_parameters_common::parallel_io
logical	m_global_parameters_common::pi_inf_wrt
real(wp)	m_global_parameters_common::poly_sigma
logical	m_global_parameters_common::polydisperse
logical	m_global_parameters_common::polytropic
integer	m_global_parameters_common::precision
real(wp)	m_global_parameters_common::pref
logical	m_global_parameters_common::pres_inf_wrt
logical	m_global_parameters_common::pres_wrt
logical	m_global_parameters_common::prim_vars_wrt
logical	m_global_parameters_common::qbmm
logical	m_global_parameters_common::qm_wrt
integer	m_global_parameters_common::recon_type
logical	m_global_parameters_common::relativity
logical	m_global_parameters_common::relax
integer	m_global_parameters_common::relax_model
logical	m_global_parameters_common::rho_wrt
real(wp)	m_global_parameters_common::rhoref
real(wp), dimension(num_fluids_max)	m_global_parameters_common::schlieren_alpha
logical	m_global_parameters_common::schlieren_wrt
real(wp)	m_global_parameters_common::sigr
real(wp)	m_global_parameters_common::sigma
logical	m_global_parameters_common::sim_data
logical	m_global_parameters_common::surface_tension
real(wp)	m_global_parameters_common::t_save
integer	m_global_parameters_common::t_step_save
integer	m_global_parameters_common::t_step_start
integer	m_global_parameters_common::t_step_stop
real(wp)	m_global_parameters_common::t_stop
integer	m_global_parameters_common::thermal
logical, dimension(3)	m_global_parameters_common::vel_wrt
integer	m_global_parameters_common::weno_order
type(physical_parameters), dimension(num_fluids_max)	m_global_parameters_common::fluid_pp
	Per-fluid stiffened-gas EOS parameters, Reynolds numbers, and shear modulus.
type(subgrid_bubble_physical_parameters)	m_global_parameters_common::bub_pp
	Subgrid bubble physical parameters.
integer	m_global_parameters_common::num_dims
	Number of spatial dimensions.
integer	m_global_parameters_common::num_vels
	Number of velocity components (different from num_dims for mhd).
integer	m_global_parameters_common::weno_polyn
	Degree of the WENO polynomials.
integer	m_global_parameters_common::muscl_polyn
	Degree of the MUSCL polynomials.
Annotations of the structure of the state and flux vectors in terms of the size and configuration of the system of
equations
integer	m_global_parameters_common::sys_size
	Number of unknowns in system of equations.
type(eqn_idx_info)	m_global_parameters_common::eqn_idx
	All conserved-variable equation index ranges and scalars.
integer	m_global_parameters_common::b_size
	Number of elements in the symmetric b tensor, plus one.
integer	m_global_parameters_common::tensor_size
	Number of elements in the full tensor plus one.
Chemistry modeling (Fypp compile-time constant; same value in all targets)
logical, parameter	m_global_parameters_common::chemistry = .False.
Elasticity and shear stress state (identical across all three executables)
logical	m_global_parameters_common::elasticity
	elasticity modeling, true for hyper or hypo
integer	m_global_parameters_common::shear_num
	Number of shear stress components.
integer, dimension(3)	m_global_parameters_common::shear_indices
	Indices of the stress components that represent shear stress.
integer	m_global_parameters_common::shear_bc_flip_num
	Number of shear stress components to reflect for boundary conditions.
integer, dimension(3, 2)	m_global_parameters_common::shear_bc_flip_indices
	Shear stress BC reflection indices (1:3, 1:shear_BC_flip_num).
Processor coordinates and parallel-IO addressing (identical declaration across all three targets)
integer, dimension(:), allocatable	m_global_parameters_common::proc_coords
	Processor coordinates in MPI_CART_COMM.
integer, dimension(:), allocatable	m_global_parameters_common::start_idx
	Starting cell-center index of local processor in global grid.
MPI info for parallel IO with Lustre file systems (identical across all three targets)
character(len=name_len)	m_global_parameters_common::mpiiofs
integer	m_global_parameters_common::mpi_info_int

Detailed Description

Contains module m_global_parameters_common.

Definition in file m_global_parameters_common.fpp.f90.