m_acoustic_src.fpp.f90 File Reference

Contains module m_acoustic_src. More...

Go to the source code of this file.

Modules
module	m_acoustic_src
	One-way acoustic source injection, Maeda and Colonius JCP (2017).

Functions/Subroutines
impure subroutine, public	m_acoustic_src::s_initialize_acoustic_src
	Initialize the acoustic source module.
impure subroutine, public	m_acoustic_src::s_acoustic_src_calculations (q_cons_vf, q_prim_vf, rhs_vf)
	Compute mass, momentum, and energy acoustic source terms and add to the RHS.
elemental subroutine	m_acoustic_src::s_source_temporal (sim_time, c, ai, term_index, frequency_local, gauss_sigma_time_local, source, sum_bb)
	Compute the temporally varying amplitude of the pulse.
impure subroutine, public	m_acoustic_src::s_precalculate_acoustic_spatial_sources
	Pre-compute non-zero spatial source weights before time-stepping.
subroutine	m_acoustic_src::s_source_spatial (j, k, l, loc, ai, source, angle, xyz_to_r_ratios)
	Compute the spatial support of the acoustic source.
subroutine	m_acoustic_src::s_source_spatial_planar (ai, sig, r, source)
	Compute the spatial support for planar acoustic sources in 1D, 2D, and 3D.
subroutine	m_acoustic_src::s_source_spatial_transducer (ai, sig, r, source, angle, xyz_to_r_ratios)
	Compute the spatial support for a single transducer in 2D, 2D axisymmetric, and 3D.
subroutine	m_acoustic_src::s_source_spatial_transducer_array (ai, sig, r, source, angle, xyz_to_r_ratios)
	Compute the spatial support for multiple transducers in 2D, 2D axisymmetric, and 3D.
elemental real(wp) function	m_acoustic_src::f_frequency_local (freq_conv_flag, ai, c)
	Convert wavelength to frequency.
real(wp) function	m_acoustic_src::f_gauss_sigma_time_local (gauss_conv_flag, ai, c)
	Convert Gaussian sigma from distance to time.

Variables
integer, dimension(:), allocatable	m_acoustic_src::pulse
integer, dimension(:), allocatable	m_acoustic_src::support
logical, dimension(:), allocatable	m_acoustic_src::dipole
real(wp), dimension(:,:), allocatable, target	m_acoustic_src::loc_acoustic
real(wp), dimension(:), allocatable	m_acoustic_src::mag
real(wp), dimension(:), allocatable	m_acoustic_src::length
real(wp), dimension(:), allocatable	m_acoustic_src::height
real(wp), dimension(:), allocatable	m_acoustic_src::wavelength
real(wp), dimension(:), allocatable	m_acoustic_src::frequency
real(wp), dimension(:), allocatable	m_acoustic_src::gauss_sigma_dist
real(wp), dimension(:), allocatable	m_acoustic_src::gauss_sigma_time
real(wp), dimension(:), allocatable	m_acoustic_src::npulse
real(wp), dimension(:), allocatable	m_acoustic_src::dir
real(wp), dimension(:), allocatable	m_acoustic_src::delay
real(wp), dimension(:), allocatable	m_acoustic_src::foc_length
real(wp), dimension(:), allocatable	m_acoustic_src::aperture
real(wp), dimension(:), allocatable	m_acoustic_src::element_spacing_angle
real(wp), dimension(:), allocatable	m_acoustic_src::element_polygon_ratio
real(wp), dimension(:), allocatable	m_acoustic_src::rotate_angle
real(wp), dimension(:), allocatable	m_acoustic_src::bb_bandwidth
real(wp), dimension(:), allocatable	m_acoustic_src::bb_lowest_freq
integer, dimension(:), allocatable	m_acoustic_src::num_elements
integer, dimension(:), allocatable	m_acoustic_src::element_on
integer, dimension(:), allocatable	m_acoustic_src::bb_num_freq
integer, dimension(:), allocatable	m_acoustic_src::source_spatials_num_points
	Number of non-zero source grid points for each source.
type(source_spatial_type), dimension(:), allocatable	m_acoustic_src::source_spatials
	Data of non-zero source grid points for each source.
Acoustic source terms
real(wp), dimension(:,:,:), allocatable	m_acoustic_src::mass_src
real(wp), dimension(:,:,:), allocatable	m_acoustic_src::e_src
real(wp), dimension(:,:,:,:), allocatable	m_acoustic_src::mom_src

Detailed Description

Contains module m_acoustic_src.

Definition in file m_acoustic_src.fpp.f90.