function fromValues input Real MM; input Real Hf; input Real H0; input Real alow[7]; input Real blow[3]; input Real ahigh[7]; input Real bhigh[3]; input Real z = 0 "Charge number"; input PhaseType phase = PhaseType.Incompressible "State of matter"; input Real VmBase = if (phase == PhaseType.Gas) then (1.380649e-23*6.02214076e23)*298.15/100000 else 0.001*MM "Base molar volume"; input Real VmExcess = 0 "Excess molar volume"; output DataRecord result(MM = MM, Hf = Hf, H0 = H0, alow = alow, blow = blow, ahigh = ahigh, bhigh = bhigh, z = z, phase = phase, VmBase = VmBase, VmExcess = VmExcess); end fromValues;