AirGapS

model AirGapS "Airgap in stator-fixed coordinate system"
    parameter Modelica.SIunits.Inductance Lm "Main field inductance";

    extends PartialAirGap;

    Modelica.SIunits.Current i_ms[2] "Magnetizing current space phasor with respect to the stator fixed frame";
protected
    parameter Modelica.SIunits.Inductance L[2,2] = {{Lm, 0}, {0, Lm}} "Inductance matrix";
equation
    i_ms = i_ss + i_rs;
    psi_mr = transpose(RotationMatrix) * psi_ms;
    psi_ms = L * i_ms;

    annotation (
        defaultComponentName = "airGap",
        Icon(
            coordinateSystem(
                preserveAspectRatio = true,
                extent = {
                    {-100, -100}, 
                    {100, 100}}),
            graphics = {
                Text(
                    extent = {
                        {-80, 40}, 
                        {0, -40}},
                    textString = "S")}),
        Documentation(info = "<html>\nModel of the airgap in stator-fixed coordinate system, using only equations.\n</html>"));
end AirGapS;