function x_transient extends Modelica.Icons.Function; input Real x(unit = "1") "total or syn reactance"; input SI.Angle[:] Tc "time constant closed-loop"; input SI.Angle[size(Tc, 1)] To "time constant open-loop"; output SIpu.Reactance[size(Tc, 1)] xtr(each unit = "1") "transient reactance"; end x_transient;