See also analog circuit on 'Diagram layer' of 'CoefSynchron' and 'CoefAsynchron'!
function z_fromTransDat extends Icons.Function; input Integer n "transient order"; input SI.Angle[n] Tc "time constant closed-loop"; input SI.Angle[n] To "time constant open-loop"; input SIpu.Reactance x(unit = "pu") "total or syn reactance"; input SIpu.Reactance xsig_s(unit = "pu") "leakage reactance stator"; input SIpu.Resistance r_s "resistance stator"; input SIpu.Current if0(unit = "pu") "field current"; input SI.Angle alpha_if0 "angle field current (sign: mathematical convention)"; input Real tol "tolerance, iterative solution"; input Boolean field "field winding yes/no"; output SIpu.Resistance[n + 1] zr(unit = "pu") "impedance matrix resistive"; output SIpu.Reactance[n + 1, n + 1] zx(unit = "pu") "impedance matrix reactive"; end z_fromTransDat;