m_helper.fpp.f90 File Reference

Functions/Subroutines
program	__m_helper_fpp_f90__
subroutine	s_compute_finite_difference_coefficients (q, s_cc, fd_coeff_s, buff_size, fd_number_in, fd_order_in, offset_s)
	The purpose of this subroutine is to compute the finite- difference coefficients for the centered schemes utilized in computations of first order spatial derivatives in the s-coordinate direction. The s-coordinate direction refers to the x-, y- or z-coordinate direction, depending on the subroutine's inputs. Note that coefficients of up to 4th order accuracy are available.
subroutine	s_comp_n_from_prim (vftmp, rtmp, ntmp, weights)
	Computes the bubble number density n from the primitive variables.
subroutine	s_comp_n_from_cons (vftmp, nrtmp, ntmp, weights)
subroutine	s_print_2d_array (a, div)
subroutine	s_initialize_nonpoly
	Initializes non-polydisperse bubble modeling.
subroutine	s_transcoeff (omega, peclet, re_trans, im_trans)
	Computes the transfer coefficient for the non-polytropic bubble compression process.
subroutine	s_int_to_str (i, res)
subroutine	s_simpson
	Computes the Simpson weights for quadrature.
real(kind(0d0)) function, dimension(3)	f_cross (a, b)
	This procedure computes the cross product of two vectors.
subroutine	s_swap (lhs, rhs)
	This procedure swaps two real numbers.
function	f_create_transform_matrix (p)
	This procedure creates a transformation matrix.
subroutine	s_transform_vec (vec, matrix)
	This procedure transforms a vector by a matrix.
subroutine	s_transform_triangle (triangle, matrix)
	This procedure transforms a triangle by a matrix, one vertex at a time.
subroutine	s_transform_model (model, matrix)
	This procedure transforms a model by a matrix, one triangle at a time.
type(t_bbox) function	f_create_bbox (model)
	This procedure creates a bounding box for a model.
logical function	f_xor (lhs, rhs)
integer function	f_logical_to_int (predicate)

Function/Subroutine Documentation

__m_helper_fpp_f90__()

program __m_helper_fpp_f90__

Here is the call graph for this function:

f_create_bbox()

type(t_bbox) function __m_helper_fpp_f90__::f_create_bbox ( type(t_model), intent(in) model )

private

This procedure creates a bounding box for a model.

Parameters

model

Model to create bounding box for.

Returns

Bounding box.

Here is the caller graph for this function:

f_create_transform_matrix()

function __m_helper_fpp_f90__::f_create_transform_matrix ( type(ic_model_parameters) p )

private

This procedure creates a transformation matrix.

Parameters

p	Parameters for the transformation.

Returns

Transformation matrix.

Here is the caller graph for this function:

f_cross()

real(kind(0d0)) function, dimension(3) __m_helper_fpp_f90__::f_cross ( real(kind(0d0)), dimension(3), intent(in) a, real(kind(0d0)), dimension(3), intent(in) b )

private

This procedure computes the cross product of two vectors.

Parameters

a	First vector.
b	Second vector.

Returns

The cross product of the two vectors.

Here is the caller graph for this function:

f_logical_to_int()

integer function __m_helper_fpp_f90__::f_logical_to_int ( logical, intent(in) predicate )

private

Here is the caller graph for this function:

f_xor()

logical function __m_helper_fpp_f90__::f_xor ( logical, intent(in) lhs, logical, intent(in) rhs )

private

Here is the caller graph for this function:

s_comp_n_from_cons()

subroutine __m_helper_fpp_f90__::s_comp_n_from_cons ( real(kind(0.d0)), intent(in) vftmp, real(kind(0.d0)), dimension(nb), intent(in) nrtmp, real(kind(0.d0)), intent(out) ntmp, real(kind(0.d0)), dimension(nb) weights )

private

Here is the caller graph for this function:

s_comp_n_from_prim()

subroutine __m_helper_fpp_f90__::s_comp_n_from_prim ( real(kind(0.d0)), intent(in) vftmp, real(kind(0.d0)), dimension(nb), intent(in) rtmp, real(kind(0.d0)), intent(out) ntmp, real(kind(0.d0)), dimension(nb) weights )

private

Computes the bubble number density n from the primitive variables.

Parameters

vftmp	is the void fraction
Rtmp	is the bubble radii
ntmp	is the output number bubble density

Here is the caller graph for this function:

s_compute_finite_difference_coefficients()

subroutine __m_helper_fpp_f90__::s_compute_finite_difference_coefficients	(	integer, intent(in)	q,
		real(kind(0d0)), dimension(-buff_size:q + buff_size), intent(in)	s_cc,
		real(kind(0d0)), dimension(:, :), intent(inout), allocatable	fd_coeff_s,
		integer, intent(in)	buff_size,
		integer, intent(in)	fd_number_in,
		integer, intent(in)	fd_order_in,
		type(int_bounds_info), intent(in), optional	offset_s )

The purpose of this subroutine is to compute the finite- difference coefficients for the centered schemes utilized in computations of first order spatial derivatives in the s-coordinate direction. The s-coordinate direction refers to the x-, y- or z-coordinate direction, depending on the subroutine's inputs. Note that coefficients of up to 4th order accuracy are available.

Parameters

q	Number of cells in the s-coordinate direction
s_cc	Locations of the cell-centers in the s-coordinate direction
fd_coeff_s	Finite-diff. coefficients in the s-coordinate direction

Here is the caller graph for this function:

s_initialize_nonpoly()

subroutine __m_helper_fpp_f90__::s_initialize_nonpoly

private

Initializes non-polydisperse bubble modeling.

Here is the call graph for this function:

Here is the caller graph for this function:

s_int_to_str()

subroutine __m_helper_fpp_f90__::s_int_to_str ( integer, intent(in) i, character(len=*) res )

private

Here is the caller graph for this function:

s_print_2d_array()

subroutine __m_helper_fpp_f90__::s_print_2d_array ( real(kind(0d0)), dimension(:, :) a, real, optional div )

private

Here is the caller graph for this function:

s_simpson()

subroutine __m_helper_fpp_f90__::s_simpson

private

Computes the Simpson weights for quadrature.

Here is the caller graph for this function:

s_swap()

subroutine __m_helper_fpp_f90__::s_swap ( real(kind(0d0)), intent(inout) lhs, real(kind(0d0)), intent(inout) rhs )

private

This procedure swaps two real numbers.

Parameters

lhs	Left-hand side.
rhs	Right-hand side.

Here is the caller graph for this function:

s_transcoeff()

subroutine __m_helper_fpp_f90__::s_transcoeff ( real(kind(0.d0)), intent(in) omega, real(kind(0.d0)), intent(in) peclet, real(kind(0.d0)), intent(out) re_trans, real(kind(0.d0)), intent(out) im_trans )

private

Computes the transfer coefficient for the non-polytropic bubble compression process.

Parameters

omega	natural frqeuencies
peclet	Peclet number
Re_trans	Real part of the transport coefficients
Im_trans	Imaginary part of the transport coefficients

Here is the caller graph for this function:

s_transform_model()

subroutine __m_helper_fpp_f90__::s_transform_model ( type(t_model), intent(inout) model, intent(in) matrix )

private

This procedure transforms a model by a matrix, one triangle at a time.

Parameters

model	Model to transform.
matrix	Transformation matrix.

Here is the call graph for this function:

Here is the caller graph for this function:

s_transform_triangle()

subroutine __m_helper_fpp_f90__::s_transform_triangle ( type(t_triangle), intent(inout) triangle, intent(in) matrix )

private

This procedure transforms a triangle by a matrix, one vertex at a time.

Parameters

triangle	Triangle to transform.
matrix	Transformation matrix.

Here is the call graph for this function:

Here is the caller graph for this function:

s_transform_vec()

subroutine __m_helper_fpp_f90__::s_transform_vec ( intent(inout) vec, intent(in) matrix )

private

This procedure transforms a vector by a matrix.

Parameters

vec	Vector to transform.
matrix	Transformation matrix.

Here is the caller graph for this function: