64 integer,
allocatable,
protected ::
iw_mag(:)
102 character(len=*),
intent(in) :: name_cons
103 character(len=*),
intent(in) :: name_prim
104 integer,
intent(in),
optional :: ix
105 logical,
intent(in),
optional :: need_bc
114 if (
present(need_bc)) add_bc = need_bc
117 if (.not.
present(ix))
then
129 character(len=*),
intent(in) :: name_cons, name_prim
130 integer,
intent(in),
optional :: ix
137 if (.not.
present(ix))
then
159 character(len=*),
intent(in) :: name_cons, name_prim
160 integer,
intent(in),
optional :: ix
167 if (.not.
present(ix))
then
194 character(len=*),
intent(in) :: message
196 write(*, *)
"ERROR for processor"
197 write(*, *) trim(message)
203 integer,
intent(in) :: ndir
204 integer :: iw(ndir), idir
207 call errormsg(
"Error: set_mom was already called")
260 integer,
intent(in) :: ndir
261 integer :: iw(ndir), idir
264 call errormsg(
"Error: set_mag was already called")
Module with basic data types used in amrvac.
integer function var_set_q()
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 nw_recon
Number of variables need reconstruction in w.
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 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 ...
subroutine errormsg(message)
Exit MPI-AMRVAC with an error message.
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 iw_q
Index of heat flux.
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.