Functions/Subroutines | |
| subroutine | cavitation_model_init |
| Initialize Fortran cavitation model API. This maps Fortran pointers to global C structure members and indicator. | |
| subroutine | cavitation_compute_source_term (pressure, voidf) |
| Compute the vaporization source term | |
| subroutine | cavitation_correct_visc_turb (crom, voidf, visct) |
| Modify eddy viscosity using the Reboud correction: | |
Variables | |
| real(c_double), pointer, save | presat |
| reference saturation pressure (kg/(m s2)) | |
| real(c_double), pointer, save | uinf |
| reference velocity of the flow (m/s) | |
| real(c_double), pointer, save | linf |
| reference length scale of the flow (m) | |
| real(c_double), pointer, save | cdest |
| constant Cdest of the condensation source term (Merkle model) | |
| real(c_double), pointer, save | cprod |
| constant Cprod of the vaporization source term (Merkle model) | |
| integer(c_int), pointer, save | icvevm |
| activation of the eddy-viscosity correction (Reboud correction) | |
| real(c_double), pointer, save | mcav |
| constant mcav of the eddy-viscosity correction (Reboud correction) | |
| integer(c_int), pointer, save | itscvi |
| implicitation in pressure of the vaporization/condensation model | |
| subroutine cavitation_compute_source_term | ( | real(c_double), dimension(ncelet) | pressure, |
| real(c_double), dimension(ncelet) | voidf ) |
Compute the vaporization source term 
![\[ m^+ = -\dfrac{C_{prod} \rho_l \min \left( p-p_V,0 \right)\alpha(1-\alpha)}
{0.5\rho_lu_\infty^2t_\infty},
\]](form_87.png)
![\[ m^- = -\dfrac{C_{dest} \rho_v \max \left( p-p_V,0 \right)\alpha(1-\alpha)}
{0.5\rho_lu_\infty^2t_\infty},
\]](form_88.png)
with 






| [in] | pressure | Pressure array |
| [in] | voidf | Void fraction array |
| subroutine cavitation_correct_visc_turb | ( | double precision, dimension(ncelet) | crom, |
| double precision, dimension(ncelet) | voidf, | ||
| double precision, dimension(ncelet) | visct ) |
Modify eddy viscosity using the Reboud correction:
![\[ \mu_t'= \dfrac{\rho_v + (1-\alpha)^{mcav}(\rho_l-\rho_v)}{\rho}\mu_t.
\]](form_95.png)
| [in] | crom | density array |
| [in] | voidf | void fraction array |
| [in,out] | visct | turbulent viscosity |
| subroutine cavitation_model_init |
Initialize Fortran cavitation model API. This maps Fortran pointers to global C structure members and indicator.