m_helper.fpp.f90 File Reference

Functions/Subroutines
program	__m_helper_fpp_f90__
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(wp) 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, center)
	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, matrix_n)
	This procedure transforms a triangle by a matrix, one vertex at a time.
subroutine	s_transform_model (model, matrix, matrix_n)
	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)
recursive real(wp) function	unassociated_legendre (x, l)
	This function generates the unassociated legendre poynomials.
recursive real(wp) function	spherical_harmonic_func (x, phi, l, m)
	This function calculates the spherical harmonic function evaluated at x and phi.
recursive real(wp) function	associated_legendre (x, l, m)
	This function generates the associated legendre polynomials evaluated at x with inputs l and m.
recursive integer(kind=int64_kind) function	double_factorial (n)
	This function calculates the double factorial value of an integer.
recursive integer(kind=int64_kind) function	factorial (n)
	The following function calculates the factorial value of an integer.

Function/Subroutine Documentation

__m_helper_fpp_f90__()

program __m_helper_fpp_f90__

Here is the call graph for this function:

associated_legendre()

recursive real(wp) function __m_helper_fpp_f90__::associated_legendre ( real(wp), intent(in) x, integer, intent(in) l, integer, intent(in) m )

private

This function generates the associated legendre polynomials evaluated at x with inputs l and m.

Parameters

x	is the input value
l	is the degree
m	is the order

Returns

P is the associated legendre polynomial evaluated at x

Here is the call graph for this function:

Here is the caller graph for this function:

double_factorial()

recursive integer(kind=int64_kind) function __m_helper_fpp_f90__::double_factorial ( integer, intent(in) n )

private

This function calculates the double factorial value of an integer.

Parameters

n	is the input integer

Returns

R is the double factorial value of n

Here is the call graph for this function:

Here is the caller 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), intent(in) p, intent(in) center )

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(wp) function, dimension(3) __m_helper_fpp_f90__::f_cross ( real(wp), dimension(3), intent(in) a, real(wp), 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:

factorial()

recursive integer(kind=int64_kind) function __m_helper_fpp_f90__::factorial ( integer, intent(in) n )

private

The following function calculates the factorial value of an integer.

Parameters

n	is the input integer

Returns

R is the factorial value of n

Here is the call graph for this function:

Here is the caller graph for this function:

s_comp_n_from_cons()

subroutine __m_helper_fpp_f90__::s_comp_n_from_cons ( real(wp), intent(in) vftmp, real(wp), dimension(nb), intent(in) nrtmp, real(wp), intent(out) ntmp, real(wp), dimension(nb), intent(in) 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(wp), intent(in)	vftmp,
		real(wp), dimension(nb), intent(in)	rtmp,
		real(wp), intent(out)	ntmp,
		real(wp), dimension(nb), intent(in)	weights )

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_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=*), intent(inout) res )

private

Here is the caller graph for this function:

s_print_2d_array()

subroutine __m_helper_fpp_f90__::s_print_2d_array ( real(wp), dimension(:, :), intent(in) a, real(wp), intent(in), 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(wp), intent(inout) lhs, real(wp), 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(wp), intent(in) omega, real(wp), intent(in) peclet, real(wp), intent(out) re_trans, real(wp), 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, intent(in) matrix_n )

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, intent(in) matrix_n )

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:

spherical_harmonic_func()

recursive real(wp) function __m_helper_fpp_f90__::spherical_harmonic_func ( real(wp), intent(in) x, real(wp), intent(in) phi, integer, intent(in) l, integer, intent(in) m )

private

This function calculates the spherical harmonic function evaluated at x and phi.

Parameters

x	is the x coordinate
phi	is the phi coordinate
l	is the degree
m	is the order

Returns

Y is the spherical harmonic function evaluated at x and phi

Here is the call graph for this function:

Here is the caller graph for this function:

unassociated_legendre()

recursive real(wp) function __m_helper_fpp_f90__::unassociated_legendre ( real(wp), intent(in) x, integer, intent(in) l )

private

This function generates the unassociated legendre poynomials.

Parameters

x	is the input value
l	is the degree

Returns

P is the unassociated legendre polynomial evaluated at x

Here is the call graph for this function:

Here is the caller graph for this function: