function h = hC(C)
% Cálcula la entalpía de una corriente
% C={Caudal(kmol/h),composición(5x1),Presión(bar),Temperatura(ºC)}

[F,z,P,T]=deal(C{:});
[CL,CV]=flashiso(C,P,T);
[L,x,P,T]=deal(CL{:});
[V,y,P,T]=deal(CV{:});
if L <= 0
   h=hV(P,T,y');
else if V<= 0
      h=hL(P,T,x');   
   else
      h=(L*hL(P,T,x')+V*hV(P,T,y'))/F;
   end
end

