See also analog circuit on 'Diagram layer' of 'CoefSynchron' and 'CoefAsynchron'!
function z_fromEqCirc extends Icons.Function; input Integer n "transient order"; 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(unit = "pu") "resistance stator"; input SIpu.Reactance[n - 1] xm2_n(unit = "pu") "coupling reactance"; input SIpu.Reactance[n] xsig_r(unit = "pu") "leakage reactance rotor"; input SIpu.Resistance[n] r_r(unit = "pu") "resistance rotor"; 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_fromEqCirc;