function RUNInductionMotorParameterEstimation import Modelica.Units.SI; import Modelica.Units.NonSI; import Modelica.Units.Conversions.*; import Complex; import Modelica.ComplexMath.arg; import Modelica.ComplexMath.real; import Modelica.ComplexMath.imag; import Modelica.ComplexMath.j; import Modelica.ComplexMath.abs; import OpenIMDML.Functions.ParameterEstimation.MotorParameterEstimationAuxiliaryFunctions.MotorParameterEstimationGaussSeidel; import OpenIMDML.Functions.ParameterEstimation.MotorParameterEstimationAuxiliaryFunctions.NEMALetterCode; import OpenIMDML.Functions.ParameterEstimation.MotorParameterEstimationAuxiliaryFunctions.NEMADesignClass; import OpenIMDML.Functions.ParameterEstimation.MotorParameterEstimationAuxiliaryFunctions.mean2numbers; input Real Php = 15 "Rated Output HorsePower"; input Real eff = 0.917 "Full Load Efficiency"; input Real PF = 0.77 "Full Load Power Factor"; input Real f = 60 "System Electrical Frequency"; input Integer N = 6 "Number of Poles"; input Real Nr = 1180 "Full Load Speed"; input String NEMACode = "F" "NEMA Code Letter"; input String NEMADesign = "B" "Nema Design Class"; input Real VRated = 230 "Rated Terminal Voltage"; end RUNInductionMotorParameterEstimation;