function activePower import Modelica.Constants.pi; extends Modelica.Icons.Function; input Modelica.SIunits.Voltage v[m] "phase voltages"; input Modelica.SIunits.Current i[m] "phase currents"; output Modelica.SIunits.Power p "Active power"; end activePower;