m_bubbles.fpp.f90 File Reference

Functions/Subroutines
program	__m_bubbles_fpp_f90__
Bubble dynamic source terms
subroutine	s_initialize_bubbles_module ()
subroutine	s_comp_alpha_from_n (q_cons_vf)
subroutine	s_compute_bubbles_rhs (idir, q_prim_vf)
subroutine	s_compute_bubble_source (q_cons_vf, q_prim_vf, t_step, rhs_vf)
	The purpose of this procedure is to compute the source terms that are needed for the bubble modeling.
real(kind(0d0)) function	f_cpbw (fr0, fr, fv, fpb)
	Function that computes that bubble wall pressure for Gilmore bubbles.
real(kind(0d0)) function	f_h (fcpbw, fcpinf, fntait, fbtait)
	Function that computes the bubble enthalpy.
real(kind(0d0)) function	f_cgas (fcpinf, fntait, fbtait, fh)
	Function that computes the sound speed for the bubble.
real(kind(0d0)) function	f_cpinfdot (frho, fp, falf, fntait, fbtait, advsrc, divu)
	Function that computes the time derivative of the driving pressure.
real(kind(0d0)) function	f_hdot (fcpbw, fcpinf, fcpinf_dot, fntait, fbtait, fr, fv, fr0, fpbdot)
	Function that computes the time derivative of the enthalpy.
real(kind(0d0)) function	f_rddot (frho, fp, fr, fv, fr0, fpb, fpbdot, alf, fntait, fbtait, f_bub_adv_src, f_divu)
	Function that computes the bubble radial acceleration based on bubble models.
real(kind(0d0)) function	f_rddot_rp (fcp, frho, fr, fv, fr0, fcpbw)
	Function that computes the bubble radial acceleration for Rayleigh-Plesset bubbles.
real(kind(0d0)) function	f_rddot_g (fcpbw, fr, fv, fh, fhdot, fcgas, fntait, fbtait)
	Function that computes the bubble radial acceleration.
real(kind(0d0)) function	f_cpbw_km (fr0, fr, fv, fpb)
	Function that computes the bubble wall pressure for Keller–Miksis bubbles.
real(kind(0d0)) function	f_rddot_km (fpbdot, fcp, fcpbw, frho, fr, fv, fr0, fc)
	Function that computes the bubble radial acceleration for Keller–Miksis bubbles.
subroutine	s_bwproperty (pb, ir0)
	Subroutine that computes bubble wall properties for vapor bubbles.
real(kind(0.d0)) function	f_vflux (fr, fv, fmass_v, ir0)
	Function that computes the vapour flux.
real(kind(0.d0)) function	f_bpres_dot (fvflux, fr, fv, fpb, fmass_v, ir0)
	Function that computes the time derivative of the internal bubble pressure.

Function/Subroutine Documentation

__m_bubbles_fpp_f90__()

program __m_bubbles_fpp_f90__

f_bpres_dot()

real(kind(0.d0)) function __m_bubbles_fpp_f90__::f_bpres_dot ( real(kind(0.d0)), intent(in) fvflux, real(kind(0.d0)), intent(in) fr, real(kind(0.d0)), intent(in) fv, real(kind(0.d0)), intent(in) fpb, real(kind(0.d0)), intent(in) fmass_v, integer, intent(in) ir0 )

private

Function that computes the time derivative of the internal bubble pressure.

Parameters

fvflux	Vapour flux
fR	Current bubble radius
fV	Current bubble velocity
fpb	Current internal bubble pressure
fmass_v	Current mass of vapour
iR0	Bubble size index

Here is the call graph for this function:

Here is the caller graph for this function:

f_cgas()

real(kind(0d0)) function __m_bubbles_fpp_f90__::f_cgas ( real(kind(0d0)), intent(in) fcpinf, real(kind(0d0)), intent(in) fntait, real(kind(0d0)), intent(in) fbtait, real(kind(0d0)), intent(in) fh )

private

Function that computes the sound speed for the bubble.

Parameters

fCpinf	Driving bubble pressure
fntait	Tait EOS parameter
fBtait	Tait EOS parameter
fH	Bubble enthalpy

Here is the call graph for this function:

Here is the caller graph for this function:

f_cpbw()

real(kind(0d0)) function __m_bubbles_fpp_f90__::f_cpbw ( real(kind(0d0)), intent(in) fr0, real(kind(0d0)), intent(in) fr, real(kind(0d0)), intent(in) fv, real(kind(0d0)), intent(in) fpb )

private

Function that computes that bubble wall pressure for Gilmore bubbles.

Parameters

fR0	Equilibrium bubble radius
fR	Current bubble radius
fV	Current bubble velocity
fpb	Internal bubble pressure

Here is the call graph for this function:

Here is the caller graph for this function:

f_cpbw_km()

real(kind(0d0)) function __m_bubbles_fpp_f90__::f_cpbw_km ( real(kind(0d0)), intent(in) fr0, real(kind(0d0)), intent(in) fr, real(kind(0d0)), intent(in) fv, real(kind(0d0)), intent(in) fpb )

private

Function that computes the bubble wall pressure for Keller–Miksis bubbles.

Parameters

fR0	Equilibrium bubble radius
fR	Current bubble radius
fV	Current bubble velocity
fpb	Internal bubble pressure

Here is the call graph for this function:

Here is the caller graph for this function:

f_cpinfdot()

real(kind(0d0)) function __m_bubbles_fpp_f90__::f_cpinfdot ( real(kind(0d0)), intent(in) frho, real(kind(0d0)), intent(in) fp, real(kind(0d0)), intent(in) falf, real(kind(0d0)), intent(in) fntait, real(kind(0d0)), intent(in) fbtait, real(kind(0d0)), intent(in) advsrc, real(kind(0d0)), intent(in) divu )

private

Function that computes the time derivative of the driving pressure.

Parameters

fRho	Local liquid density
fP	Local pressure
falf	Local void fraction
fntait	Tait EOS parameter
fBtait	Tait EOS parameter
advsrc	Advection equation source term
divu	Divergence of velocity

Here is the call graph for this function:

Here is the caller graph for this function:

f_h()

real(kind(0d0)) function __m_bubbles_fpp_f90__::f_h ( real(kind(0d0)), intent(in) fcpbw, real(kind(0d0)), intent(in) fcpinf, real(kind(0d0)), intent(in) fntait, real(kind(0d0)), intent(in) fbtait )

private

Function that computes the bubble enthalpy.

Parameters

fCpbw	Bubble wall pressure
fCpinf	Driving bubble pressure
fntait	Tait EOS parameter
fBtait	Tait EOS parameter

Here is the call graph for this function:

Here is the caller graph for this function:

f_hdot()

real(kind(0d0)) function __m_bubbles_fpp_f90__::f_hdot ( real(kind(0d0)), intent(in) fcpbw, real(kind(0d0)), intent(in) fcpinf, real(kind(0d0)), intent(in) fcpinf_dot, real(kind(0d0)), intent(in) fntait, real(kind(0d0)), intent(in) fbtait, real(kind(0d0)), intent(in) fr, real(kind(0d0)), intent(in) fv, real(kind(0d0)), intent(in) fr0, real(kind(0d0)), intent(in) fpbdot )

private

Function that computes the time derivative of the enthalpy.

Parameters

fCpbw	Bubble wall pressure
fCpinf	Driving bubble pressure
fCpinf_dot	Time derivative of the driving pressure
fntait	Tait EOS parameter
fBtait	Tait EOS parameter
fR0	Equilibrium bubble radius
fR	Current bubble radius
fV	Current bubble velocity
fpbdot	Time derivative of the internal bubble pressure

Here is the call graph for this function:

Here is the caller graph for this function:

f_rddot()

real(kind(0d0)) function __m_bubbles_fpp_f90__::f_rddot ( real(kind(0d0)), intent(in) frho, real(kind(0d0)), intent(in) fp, real(kind(0d0)), intent(in) fr, real(kind(0d0)), intent(in) fv, real(kind(0d0)), intent(in) fr0, real(kind(0d0)), intent(in) fpb, real(kind(0d0)), intent(in) fpbdot, real(kind(0d0)), intent(in) alf, real(kind(0d0)), intent(in) fntait, real(kind(0d0)), intent(in) fbtait, real(kind(0d0)), intent(in) f_bub_adv_src, real(kind(0d0)), intent(in) f_divu )

private

Function that computes the bubble radial acceleration based on bubble models.

Parameters

fRho	Current density
fP	Current driving pressure
fR	Current bubble radius
fV	Current bubble velocity
fR0	Equilibrium bubble radius
fpb	Internal bubble pressure
fpbdot	Time-derivative of internal bubble pressure
alf	bubble volume fraction
fntait	Tait EOS parameter
fBtait	Tait EOS parameter
f_bub_adv_src	Source for bubble volume fraction
f_divu	Divergence of velocity

Here is the call graph for this function:

Here is the caller graph for this function:

f_rddot_g()

real(kind(0d0)) function __m_bubbles_fpp_f90__::f_rddot_g ( real(kind(0d0)), intent(in) fcpbw, real(kind(0d0)), intent(in) fr, real(kind(0d0)), intent(in) fv, real(kind(0d0)), intent(in) fh, real(kind(0d0)), intent(in) fhdot, real(kind(0d0)), intent(in) fcgas, real(kind(0d0)), intent(in) fntait, real(kind(0d0)), intent(in) fbtait )

private

Function that computes the bubble radial acceleration.

Parameters

fCpbw	Bubble wall pressure
fR	Current bubble radius
fV	Current bubble velocity
fH	Current enthalpy
fHdot	Current time derivative of the enthalpy
fcgas	Current gas sound speed
fntait	Tait EOS parameter
fBtait	Tait EOS parameter

Here is the call graph for this function:

Here is the caller graph for this function:

f_rddot_km()

real(kind(0d0)) function __m_bubbles_fpp_f90__::f_rddot_km ( real(kind(0d0)), intent(in) fpbdot, real(kind(0d0)), intent(in) fcp, real(kind(0d0)), intent(in) fcpbw, real(kind(0d0)), intent(in) frho, real(kind(0d0)), intent(in) fr, real(kind(0d0)), intent(in) fv, real(kind(0d0)), intent(in) fr0, real(kind(0d0)), intent(in) fc )

private

Function that computes the bubble radial acceleration for Keller–Miksis bubbles.

Parameters

fpbdot	Time-derivative of internal bubble pressure
fCp	Driving pressure
fCpbw	Bubble wall pressure
fRho	Current density
fR	Current bubble radius
fV	Current bubble velocity
fR0	Equilibrium bubble radius
fC	Current sound speed

Here is the call graph for this function:

Here is the caller graph for this function:

f_rddot_rp()

real(kind(0d0)) function __m_bubbles_fpp_f90__::f_rddot_rp ( real(kind(0d0)), intent(in) fcp, real(kind(0d0)), intent(in) frho, real(kind(0d0)), intent(in) fr, real(kind(0d0)), intent(in) fv, real(kind(0d0)), intent(in) fr0, real(kind(0d0)), intent(in) fcpbw )

private

Function that computes the bubble radial acceleration for Rayleigh-Plesset bubbles.

Parameters

fCp	Driving pressure
fRho	Current density
fR	Current bubble radius
fV	Current bubble velocity
fR0	Equilibrium bubble radius
fCpbw	Boundary wall pressure

Here is the call graph for this function:

Here is the caller graph for this function:

f_vflux()

real(kind(0.d0)) function __m_bubbles_fpp_f90__::f_vflux ( real(kind(0.d0)), intent(in) fr, real(kind(0.d0)), intent(in) fv, real(kind(0.d0)), intent(in) fmass_v, integer, intent(in) ir0 )

private

Function that computes the vapour flux.

Parameters

fR	Current bubble radius
fV	Current bubble velocity
fmass_v	Current mass of vapour
iR0	Bubble size index

Here is the call graph for this function:

Here is the caller graph for this function:

s_bwproperty()

subroutine __m_bubbles_fpp_f90__::s_bwproperty ( real(kind(0.d0)), intent(in) pb, integer, intent(in) ir0 )

private

Subroutine that computes bubble wall properties for vapor bubbles.

Parameters

pb	Internal bubble pressure
iR0	Current bubble size index

Here is the caller graph for this function:

s_comp_alpha_from_n()

subroutine __m_bubbles_fpp_f90__::s_comp_alpha_from_n ( type(scalar_field), dimension(sys_size), intent(inout) q_cons_vf )

private

Here is the caller graph for this function:

s_compute_bubble_source()

subroutine __m_bubbles_fpp_f90__::s_compute_bubble_source ( type(scalar_field), dimension(sys_size), intent(inout) q_cons_vf, type(scalar_field), dimension(sys_size), intent(in) q_prim_vf, integer, intent(in) t_step, type(scalar_field), dimension(sys_size), intent(inout) rhs_vf )

private

The purpose of this procedure is to compute the source terms that are needed for the bubble modeling.

Parameters

q_prim_vf	Primitive variables
q_cons_vf	Conservative variables
divu	Divergence of velocity
bub_adv_src	Advection equation source due to bubble compression/expansion
bub_r_src	Bubble radius equation source
bub_v_src	Bubble velocity equation source
bub_p_src	Bubble pressure equation source
bub_m_src	Bubble mass equation source

Here is the call graph for this function:

Here is the caller graph for this function:

s_compute_bubbles_rhs()

subroutine __m_bubbles_fpp_f90__::s_compute_bubbles_rhs ( integer idir, type(scalar_field), dimension(sys_size), intent(in) q_prim_vf )

private

Here is the caller graph for this function:

s_initialize_bubbles_module()

subroutine __m_bubbles_fpp_f90__::s_initialize_bubbles_module

private

Here is the caller graph for this function: