function mixtureViscosityChung extends Modelica.Icons.Function; input Temperature T "Temperature"; input Temperature[nX] Tc "Critical temperatures"; input MolarVolume[nX] Vcrit "Critical volumes (m3/mol)"; input Real[nX] w "Acentric factors"; input Real[nX] mu "Dipole moments (debyes)"; input MolarMass[nX] MolecularWeights "Molecular weights (kg/mol)"; input MoleFraction[nX] y "Molar Fractions"; input Real[nX] kappa = zeros(nX) "Association Factors"; output DynamicViscosity etaMixture "Mixture viscosity (Pa.s)"; end mixtureViscosityChung;