get_z Subroutine

public subroutine get_z(alpha, z_0, z_inj, z, dzda)

Calculate the fluid composition based on an amount of addition of second fluid.

The injection can be considered as two kinds of injection: - Displacement: $z = \alpha z_i + (1-\alpha) z_0$ - Addition: $z = \frac{\alpha z_i + (1-\alpha) z_0}{\sum_{i=1}^N \alpha z_i + (1-\alpha) z_0}$

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=pr),	intent(in)			::	alpha	Addition percentaje $\alpha$
real(kind=pr),	intent(in)			::	z_0(:)
real(kind=pr),	intent(in)			::	z_inj(:)
real(kind=pr),	intent(out)			::	z(size(z_0))	New composition
real(kind=pr),	intent(out),	optional		::	dzda(size(z_0))	Derivative wrt $\alpha$