67 integer,
allocatable,
protected ::
iw_mag(:)
98 character(len=*),
intent(in) :: name_cons
99 character(len=*),
intent(in) :: name_prim
100 integer,
intent(in),
optional :: ix
101 logical,
intent(in),
optional :: need_bc
110 if (
present(need_bc)) add_bc = need_bc
113 if (.not.
present(ix))
then
125 character(len=*),
intent(in) :: name_cons, name_prim
126 integer,
intent(in),
optional :: ix
133 if (.not.
present(ix))
then
155 character(len=*),
intent(in) :: name_cons, name_prim
156 integer,
intent(in),
optional :: ix
163 if (.not.
present(ix))
then
187 integer,
intent(in) :: ndir
188 integer :: iw(ndir), idir
191 call mpistop(
"Error: set_mom was already called")
232 integer,
intent(in) :: ndir
233 integer :: iw(ndir), idir
236 call mpistop(
"Error: set_mag was already called")
subroutine mpistop(message)
Exit MPI-AMRVAC with an error message.
Module with basic data types used in amrvac.
integer iw_tcoff
Index of the cutoff temperature for the TRAC method.
integer nwextra
Number of extra variables in w.
character(len=name_len), dimension(max_nw) prim_wnames
Primitive variable names.
integer nw
Total number of variables.
character(len=name_len), dimension(max_nw) cons_wnames
Conservative variable names.
integer nwaux
Number of auxiliary variables in w.
integer function var_set_rho()
Set density variable.
integer function var_set_energy()
Set energy variable.
integer nvector
Number of vector variables (used for writing output)
integer iw_eaux
Index of the internal energy density.
integer number_species
number of species: each species has different characterictic speeds and should be used accordingly in...
integer, dimension(:), allocatable iw_mom
Indices of the momentum density.
integer, dimension(:), allocatable start_indices
the indices in 1:nwflux array are assumed consecutive for each species this array should be of size n...
integer nws
Total number of stagger variables.
integer, dimension(:), allocatable stop_indices
the indices in 1:nwflux array are assumed consecutive for each species this array should be of size n...
integer, dimension(:), allocatable, protected iw_mag
Indices of the magnetic field components.
integer function var_set_auxvar(name_cons, name_prim, ix)
Set auxiliary variable, which is not advected but has boundary conditions. This has to be done after ...
integer function var_set_wextra()
Set extra variable in wextra, which is not advected and has no boundary conditions and not output in ...
integer, dimension(:), allocatable iw_vector
Indices of vector variables.
integer, parameter max_nw
Maximum number of variables.
integer function var_set_extravar(name_cons, name_prim, ix)
Set extra variable in w, which is not advected and has no boundary conditions. This has to be done af...
integer nwgc
Number of variables which need to be updated in ghost cells.
integer function, dimension(ndir) var_set_momentum(ndir)
Set momentum variables.
integer function var_set_radiation_energy()
integer iw_rho
Index of the (gas) density.
integer nwflux
Number of flux variables.
integer iw_r_e
Index of the radiation energy density.
integer index_v_mag
index of the var whose velocity appears in the induction eq.
integer function, dimension(ndir) var_set_bfield(ndir)
Set magnetic field variables.
integer nw_extra
Number of extra variables in wextra seperated from w.
integer iw_e
Index of the energy density.
integer function var_set_fluxvar(name_cons, name_prim, ix, need_bc)
Set generic flux variable.
integer nwfluxbc
Number of flux variables which need user to specify boundary type.
integer function var_set_internal_energy()
Set internal energy variable.