encapsulated function normalizationFactor import Modelica; import Modelica.Utilities.Streams; input Real c1[:] "[p] coefficients of denominator polynomials (c1[i}*p + 1)"; input Real c2[:, 2] "[p^2, p] coefficients of denominator polynomials (c2[i,1]*p^2 + c2[i,2]*p + 1)"; output Real alpha "Correction factor (replace p by alpha*p)"; end normalizationFactor;