Binary mobility factor for H2O and O2
function k_H2O_O2 import Modelica.Media.IdealGases.Common.FluidData; extends BaseClasses.k(final T_crit = sqrt(FluidData.H2O.criticalTemperature*FluidData.O2.criticalTemperature)*U.K, final p_crit = sqrt(FluidData.H2O.criticalPressure*FluidData.O2.criticalPressure)*U.Pa, redeclare package A = H2O.Gas, redeclare package B = O2.Gas, redeclare function pDstar = BaseClasses.pDstar_polar); end k_H2O_O2;