Calculates base-resistance and -inductance depending on the choice of units (fist component is R, second is L).
"pu":
RL_base = (V_nom*V_nom/S_nom)*{1, 1/omega_nom}"SI":
RL_base = {1, 1/omega_nom} (converts reactance X to inductance L!)
function baseRL extends Modelica.Icons.Function; input Boolean puUnits "= true if pu else SI units"; input SI.Voltage V_nom "nom voltage"; input SI.ApparentPower S_nom "apparent power"; input SI.AngularFrequency omega_nom "angular frequency"; input Integer scale = 1 "scaling factor topology (Y:1, Delta:3)"; output Real[2] RL_base "base {resistance, inductance}"; end baseRL;