Skip to content

Commit 5f36838

Browse files
committed
Added parameter docs
1 parent a1bec66 commit 5f36838

File tree

1 file changed

+19
-5
lines changed

1 file changed

+19
-5
lines changed

src/simulation/m_bubbles.fpp

Lines changed: 19 additions & 5 deletions
Original file line numberDiff line numberDiff line change
@@ -38,6 +38,12 @@ contains
3838
!! @param f_bub_adv_src Source for bubble volume fraction
3939
!! @param f_divu Divergence of velocity
4040
!! @param fCson Speed of sound from fP (EL)
41+
!! @param gam_l Physical Bubble parameter (pass in from global parameters)
42+
!! @param Ca_l Cavitation number (pass in from global parameters)
43+
!! @param Web_l Weber number (pass in from global parameters)
44+
!! @param Re_inv_l Inverse Reynolds number (pass in from global parameters)
45+
!! @param bubbles_euler_l Bubbles euler on/off (pass in from global parameters)
46+
!! @param polytropic_l Polytropic switch (pass in from global parameters)
4147
pure elemental function f_rddot(fRho, fP, fR, fV, fR0, fpb, fpbdot, alf, fntait, fBtait, f_bub_adv_src, f_divu, fCson, gam_l, Ca_l, Web_l, Re_inv_l, bubbles_euler_l, polytropic_l)
4248
!$acc routine seq
4349
real(wp), intent(in) :: fRho, fP, fR, fV, fR0, fpb, fpbdot, alf
@@ -311,7 +317,6 @@ contains
311317
!! @param Web_l Weber number (pass in from global parameters)
312318
!! @param Re_inv_l Inverse Reynolds number (pass in from global parameters)
313319
!! @param polytropic_l Polytropic switch (pass in from global parameters)
314-
!! @param bubbles_lagrange_l Lagrangian subgrid bubble model switch (pass in from global parameters)
315320
pure elemental function f_rddot_KM(fpbdot, fCp, fCpbw, fRho, fR, fV, fR0, fC, gam_l, Ca_l, Web_l, Re_inv_l, polytropic_l)
316321
!$acc routine seq
317322
real(wp), intent(in) :: fpbdot, fCp, fCpbw
@@ -385,7 +390,6 @@ contains
385390
!! @param thermal_l Thermal behavior (pass in from global parameters)
386391
!! @param fmass_n Current gas mass (EL)
387392
!! @param fbeta_c Mass transfer coefficient (EL)
388-
!! @param fconc_v Current vapor concentration (EL)
389393
function f_vflux(fR, fV, fpb, fmass_v, iR0, mass_n0_l, Re_trans_c_l, chi_vw_l, rho_mw_l, Pe_c_l, pv_l, R_v_l, Tw_l, thermal_l, bubbles_lagrange_l, fmass_n, fbeta_c, fR_m, fgamma_m)
390394
!$acc routine seq
391395
real(wp), intent(in) :: fR
@@ -446,11 +450,21 @@ contains
446450
!! @param fpb Current internal bubble pressure
447451
!! @param fmass_v Current mass of vapour
448452
!! @param iR0 Bubble size index (EE) or bubble identifier (EL)
449-
!! @param fbeta_t Mass transfer coefficient (EL)
453+
!! @param Tw_l Physical bubble parameters (pass in from global parameters)
454+
!! @param R_v_l Physical bubble parameters (pass in from global parameters)
455+
!! @param pv_l Physical bubble parameters (pass in from global parameters)
456+
!! @param pb0_l Physical bubble parameters (pass in from global parameters)
457+
!! @param mass_n0_l Physical bubble parameters (pass in from global parameters)
458+
!! @param mass_v0_l Physical bubble parameters (pass in from global parameters)
459+
!! @param Pe_T_l Physical bubble parameters (pass in from global parameters)
460+
!! @param Re_trans_T_l Physical bubble parameters (pass in from global parameters)
461+
!! @param k_mw_l Bubble Wall properties (pass in from bubbles module)
462+
!! @param thermal_l Thermal Behavior (pass in from global parameters)
463+
!! @param bubbles_lagrange_l Lagrangian subgrid bubble model switch (pass in from global parameters)
464+
!! @param fbeta_t Mass transfer coefficient (EL)
450465
!! @param fR_m Mixture gas constant (EL)
451466
!! @param fgamma_m Mixture gamma (EL)
452-
!! @param fconc_v Current vapor concentration (EL)
453-
function f_bpres_dot(fvflux, fR, fV, fpb, fmass_v, iR0, Tw_l, R_v_l, pv_l, pb0_l, mass_n0_l, mass_v0_l, Pe_T_l, Re_trans_T_l, k_mw_l, thermal_l, bubbles_lagrange_l, fbeta_t, fR_m, fgamma_m)
467+
pure function f_bpres_dot(fvflux, fR, fV, fpb, fmass_v, iR0, Tw_l, R_v_l, pv_l, pb0_l, mass_n0_l, mass_v0_l, Pe_T_l, Re_trans_T_l, k_mw_l, thermal_l, bubbles_lagrange_l, fbeta_t, fR_m, fgamma_m)
454468
!$acc routine seq
455469
real(wp), intent(in) :: fvflux
456470
real(wp), intent(in) :: fR

0 commit comments

Comments
 (0)