| subroutine fluid_volflow::fluid_vol_flow |
( |
class(fluid_volflow_t), intent(inout) |
this, |
|
|
type(field_t), intent(inout) |
u, |
|
|
type(field_t), intent(inout) |
v, |
|
|
type(field_t), intent(inout) |
w, |
|
|
type(field_t), intent(inout) |
p, |
|
|
type(field_t), intent(inout) |
u_res, |
|
|
type(field_t), intent(inout) |
v_res, |
|
|
type(field_t), intent(inout) |
w_res, |
|
|
type(field_t), intent(inout) |
p_res, |
|
|
type(coef_t), intent(inout) |
c_xh, |
|
|
type(gs_t), intent(inout) |
gs_xh, |
|
|
type(time_scheme_controller_t), intent(in) |
ext_bdf, |
|
|
real(kind=rp), intent(in) |
rho, |
|
|
type(field_t) |
mu, |
|
|
real(kind=rp), intent(in) |
dt, |
|
|
type(time_state_t), intent(in) |
time, |
|
|
type(scalar_bc_projector_t), intent(inout) |
dp_projector, |
|
|
class(vector_bc_projector_t), intent(inout) |
vel_projector, |
|
|
class(ax_t), intent(in) |
ax_vel, |
|
|
class(ax_t), intent(in) |
ax_prs, |
|
|
class(ksp_t), intent(inout) |
ksp_prs, |
|
|
class(ksp_t), intent(inout) |
ksp_vel, |
|
|
class(pc_t), intent(inout) |
pc_prs, |
|
|
class(pc_t), intent(inout) |
pc_vel, |
|
|
integer, intent(in) |
prs_max_iter, |
|
|
integer, intent(in) |
vel_max_iter |
|
) |
| |
|
private |