Commit ef679531 authored by Henning Francke's avatar Henning Francke
Browse files

Added degassingPressure_H2

parent e184b81e
within BrineProp.GasData;
function degassingPressure_H2_Chabab2020
"calculates degassing pressure from concentration of dissolved gas"
extends partial_degassingPressure_pTX;
/*protected
SI.MassFraction solu_soll=X[end-3];*/
algorithm
// print("p_sat_CH4("+String(X[end-1])+") (degassingPressure_H2_Chabab2020)");
p_gas := Modelica.Math.Nonlinear.solveOneNonlinearEquation(
function solubility_res(
solufun=function solubility_H2_pTX_Chabab2020(),p=p,T=T,X=X,MM_vec=MM_vec,
c_gas=X[iCH4]),
0,
2000e5,
1e-8);
// print("p_sat_CH4("+String(X[end-1])+")="+String(p_gas)+" (degassingPressure_H2_Chabab2020)");
end degassingPressure_H2_Chabab2020;
......@@ -38,3 +38,4 @@ solubility_H2_pTX_Chabab2020_molality
solubility_H2_pTb_Chabab2020_molality
solubility_H2_pTb_Chabab2020_y
solubility_H2_pT_Chabab2020_y
degassingPressure_H2_Chabab2020
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment