PLUME-MoM-TSM
1.0
VolcanicPlumeModel
|
Constitutive equations. More...
Functions/Subroutines | |
subroutine | init_problem_param |
Initialization of relaxation flags. More... | |
subroutine | r_phys_var (r_qj, r_h, r_u, r_v) |
Physical variables. More... | |
subroutine | c_phys_var (c_qj, h, u, v) |
Physical variables. More... | |
subroutine | mixt_var (qpj) |
Physical variables. More... | |
subroutine | qc_to_qp (qc, qp) |
Conservative to physical variables. More... | |
subroutine | qp_to_qc (qp, qc) |
Physical to conservative variables. More... | |
subroutine | qp_to_qp2 (qpj, qp2j) |
Additional Physical variables. More... | |
subroutine | eval_local_speeds_x (qpj, vel_min, vel_max) |
Local Characteristic speeds x direction. More... | |
subroutine | eval_local_speeds_y (qpj, vel_min, vel_max) |
Local Characteristic speeds y direction. More... | |
subroutine | eval_fluxes (qcj, qpj, dir, flux) |
Hyperbolic Fluxes. More... | |
subroutine | eval_nonhyperbolic_terms (cell_fract_jk, dx_rel_jk, dy_rel_jk, c_qj, c_nh_term_impl, r_qj, r_nh_term_impl) |
Non-Hyperbolic terms. More... | |
subroutine | eval_source_bdry (time, vect_x, vect_y, source_bdry) |
Internal boundary source fluxes. More... | |
Variables | |
logical, dimension(:), allocatable | implicit_flag |
flag used for size of implicit non linear-system More... | |
real(wp) | u_atm_umbl |
real(wp) | v_atm_umbl |
real(wp) | n |
real(wp) | grav |
real(wp) | drho_dz |
real(wp) | rho_nbl |
Constitutive equations.
subroutine constitutive_2d::c_phys_var | ( | complex(wp), dimension(n_vars), intent(in) | c_qj, |
complex(wp), intent(out) | h, | ||
complex(wp), intent(out) | u, | ||
complex(wp), intent(out) | v | ||
) |
Physical variables.
This subroutine evaluates from the conservative local variables qj the local physical variables ( ).
[in] | c_qj | complex conservative variables |
[out] | h | complex-value flow thickness |
[out] | u | complex-value flow x-velocity |
[out] | v | complex-value flow y-velocity |
[out] | h | height [m] |
[out] | u | velocity (x direction) [m s-1] |
[out] | v | velocity (y direction) [m s-1] |
Definition at line 111 of file constitutive_2d.f90.
subroutine constitutive_2d::eval_fluxes | ( | real(wp), dimension(n_vars), intent(in) | qcj, |
real(wp), dimension(n_vars+2), intent(in) | qpj, | ||
integer, intent(in) | dir, | ||
real(wp), dimension(n_eqns), intent(out) | flux | ||
) |
Hyperbolic Fluxes.
This subroutine evaluates the numerical fluxes given the conservative variables qcj and physical variables qpj.
[in] | qcj | real local conservative variables |
[in] | qpj | real local physical variables |
[in] | dir | direction of the flux (1=x,2=y) |
[out] | flux | real fluxes |
Definition at line 427 of file constitutive_2d.f90.
subroutine constitutive_2d::eval_local_speeds_x | ( | real(wp), dimension(n_vars+2), intent(in) | qpj, |
real(wp), dimension(n_vars), intent(out) | vel_min, | ||
real(wp), dimension(n_vars), intent(out) | vel_max | ||
) |
Local Characteristic speeds x direction.
This subroutine computes from the physical variable evaluates the largest positive and negative characteristic speed in the x-direction.
[in] | qpj | array of local physical variables |
[out] | vel_min | minimum x-velocity |
[out] | vel_max | maximum x-velocity |
Definition at line 357 of file constitutive_2d.f90.
subroutine constitutive_2d::eval_local_speeds_y | ( | real(wp), dimension(n_vars+2), intent(in) | qpj, |
real(wp), dimension(n_vars), intent(out) | vel_min, | ||
real(wp), dimension(n_vars), intent(out) | vel_max | ||
) |
Local Characteristic speeds y direction.
This subroutine computes from the physical variable evaluates the largest positive and negative characteristic speed in the y-direction.
[in] | qpj | array of local physical variables |
[out] | vel_min | minimum y-velocity |
[out] | vel_max | maximum y-velocity |
Definition at line 391 of file constitutive_2d.f90.
subroutine constitutive_2d::eval_nonhyperbolic_terms | ( | real(wp), intent(in) | cell_fract_jk, |
real(wp), intent(in) | dx_rel_jk, | ||
real(wp), intent(in) | dy_rel_jk, | ||
complex(wp), dimension(n_vars), intent(in), optional | c_qj, | ||
complex(wp), dimension(n_eqns), intent(out), optional | c_nh_term_impl, | ||
real(wp), dimension(n_vars), intent(in), optional | r_qj, | ||
real(wp), dimension(n_eqns), intent(out), optional | r_nh_term_impl | ||
) |
Non-Hyperbolic terms.
This subroutine evaluates the non-hyperbolic terms (relaxation terms and forces) of the system of equations, both for real or complex inputs. These terms are treated implicitely in the DIRK numerical scheme.
[in] | c_qj | complex conservative variables |
[in] | r_qj | real conservative variables |
[out] | c_nh_term_impl | complex non-hyperbolic terms |
[out] | r_nh_term_impl | real non-hyperbolic terms |
Definition at line 500 of file constitutive_2d.f90.
subroutine constitutive_2d::eval_source_bdry | ( | real(wp), intent(in) | time, |
real(wp), intent(in) | vect_x, | ||
real(wp), intent(in) | vect_y, | ||
real(wp), dimension(n_vars), intent(out) | source_bdry | ||
) |
Internal boundary source fluxes.
This subroutine evaluates the source terms at the interfaces when an internal radial source is present, as for a base surge. The terms are applied as boundary conditions, and thus they have the units of the physical variable qp
[in] | time | time |
[in] | vect_x | unit vector velocity x-component |
[in] | vect_y | unit vector velocity y-component |
[out] | source_bdry | source terms |
Definition at line 607 of file constitutive_2d.f90.
subroutine constitutive_2d::init_problem_param | ( | ) |
Initialization of relaxation flags.
This subroutine set the number and the flags of the non-hyperbolic terms.
Definition at line 30 of file constitutive_2d.f90.
subroutine constitutive_2d::mixt_var | ( | real(wp), dimension(n_vars+2), intent(in) | qpj | ) |
Physical variables.
This subroutine evaluates from the physical real-value local variables qpj, all the (real-valued ) variables that define the physical state and that are needed to compute the explicit equations terms.
[in] | qpj | real-valued physical variables |
[in] | qpj | real-value physical variables |
Definition at line 167 of file constitutive_2d.f90.
subroutine constitutive_2d::qc_to_qp | ( | real(wp), dimension(n_vars), intent(in) | qc, |
real(wp), dimension(n_vars+2), intent(out) | qp | ||
) |
Conservative to physical variables.
This subroutine evaluates from the conservative variables qc the array of physical variables qp:
The physical variables are those used for the linear reconstruction at the cell interfaces. Limiters are applied to the reconstructed slopes.
[in] | qc | local conservative variables |
[out] | qp | local physical variables |
Definition at line 217 of file constitutive_2d.f90.
subroutine constitutive_2d::qp_to_qc | ( | real(wp), dimension(n_vars+2), intent(in) | qp, |
real(wp), dimension(n_vars), intent(out) | qc | ||
) |
Physical to conservative variables.
This subroutine evaluates the conservative real_value variables qc from the array of real_valued physical variables qp:
[in] | qp | physical variables |
[out] | qc | conservative variables |
Definition at line 262 of file constitutive_2d.f90.
subroutine constitutive_2d::qp_to_qp2 | ( | real(wp), dimension(n_vars), intent(in) | qpj, |
real(wp), dimension(3), intent(out) | qp2j | ||
) |
Additional Physical variables.
This subroutine evaluates from the physical local variables qpj, the two additional local variables qp2j = (h+B,u,v).
[in] | qpj | real-valued physical variables |
[in] | Bj | real-valued local topography |
[out] | qp2j | real-valued physical variables |
Definition at line 319 of file constitutive_2d.f90.
subroutine constitutive_2d::r_phys_var | ( | real(wp), dimension(n_vars), intent(in) | r_qj, |
real(wp), intent(out) | r_h, | ||
real(wp), intent(out) | r_u, | ||
real(wp), intent(out) | r_v | ||
) |
Physical variables.
This subroutine evaluates from the conservative local variables qj the local physical variables ( ).
[in] | r_qj | real conservative variables |
[out] | r_h | real-value flow thickness |
[out] | r_u | real-value flow x-velocity |
[out] | r_v | real-value flow y-velocity |
[out] | r_alphas | real-value solid volume fractions |
[out] | r_rho_m | real-value flow density |
[out] | r_T | real-value flow temperature |
[out] | r_alphal | real-value liquid volume fraction |
[in] | r_qj | real-value conservative var |
[out] | r_h | real-value flow thickness |
[out] | r_u | real-value x-velocity |
[out] | r_v | real-value y-velocity |
Definition at line 66 of file constitutive_2d.f90.
real(wp) constitutive_2d::drho_dz |
Definition at line 17 of file constitutive_2d.f90.
real(wp) constitutive_2d::grav |
Definition at line 17 of file constitutive_2d.f90.
logical, dimension(:), allocatable constitutive_2d::implicit_flag |
flag used for size of implicit non linear-system
Definition at line 13 of file constitutive_2d.f90.
real(wp) constitutive_2d::n |
Definition at line 16 of file constitutive_2d.f90.
real(wp) constitutive_2d::rho_nbl |
Definition at line 17 of file constitutive_2d.f90.
real(wp) constitutive_2d::u_atm_umbl |
Definition at line 15 of file constitutive_2d.f90.
real(wp) constitutive_2d::v_atm_umbl |
Definition at line 15 of file constitutive_2d.f90.