|
MAMMA
1.0
Conduitsolver
|
Initial solution. More...
Functions/Subroutines | |
| subroutine | init_steady (u_0, qp) |
| Steady problem initialization. More... | |
Variables | |
| real *8 | alfa1_in |
| Inlet first phase volume fraction. More... | |
| real *8 | p1_in |
| Inlet first phase pressure. More... | |
| real *8 | p2_in |
| Inlet second phase pressure. More... | |
| real *8 | delta_p_in |
| Inlet pressure difference ( p2-p1 ) More... | |
| real *8 | u1_in |
| Inlet first phase velocity. More... | |
| real *8 | u2_in |
| Inlet second phase velocity. More... | |
| real *8 | t_in |
| Inlet temperature. More... | |
| real *8, dimension(:), allocatable | beta_in |
| Inlet crystal volume fraction. More... | |
| real *8, dimension(:), allocatable | xd_md_in |
| Inlet dissolved gas mass fraction. More... | |
| real *8 | frag_eff_in |
| Inlet fragmentation efficiency. More... | |
| real *8 | p_out |
| Outlet pressure. More... | |
Initial solution.
| subroutine init::init_steady | ( | real*8, intent(in) | u_0, |
| real*8, dimension(n_vars), intent(out) | qp | ||
| ) |
Steady problem initialization.
This subroutine initialize the state for a steady solution problem, given the inlet velocity u_0.
| [in] | u_0 | inlet velocity |
| [out] | qp | physical variables at the inlet |
Definition at line 53 of file init.f90.


| real*8, dimension(:), allocatable init::beta_in |
1.8.11