function NRTLFun input Integer nS; input Integer k; input Modelica.Units.SI.MoleFraction x[nS]; input Modelica.Units.SI.Temperature T; input Real alpha[nS, nS]; input Real g[nS, nS]; output Real NRTL = 0; end NRTLFun;