Magnetic.Sources

Name	Description
ConstantMagnetomotiveForce	Source of constant magnetic potential difference
SignalMagnetomotiveForce	Signal controlled source of a magnetic potential difference
ElectroMagneticConverter
PermanentMagnet	Permanent Magnet with linear demagnetization curve B(H)

Magnetic.Sources.ConstantMagnetomotiveForce

Parameters

Name	Default	Description
theta	1000	Magnetomotive force (e.g. for a coil: current I * number of turns) [A]

Modelica definition

model ConstantMagnetomotiveForce 
  "Source of constant magnetic potential difference" 
  extends Magnetic.Interfaces.MagneticFluxTube;
  parameter SI.Current theta = 1000 
    "Magnetomotive force (e.g. for a coil: current I * number of turns)";
equation 
  V_mag = theta;
end ConstantMagnetomotiveForce;

Magnetic.Sources.SignalMagnetomotiveForce

Modelica definition

model SignalMagnetomotiveForce 
  "Signal controlled source of a magnetic potential difference" 
  
  extends Magnetic.Interfaces.MagneticFluxTube;
  Modelica.Blocks.Interfaces.RealInput theta;
equation 
  V_mag =theta;
end SignalMagnetomotiveForce;

Magnetic.Sources.ElectroMagneticConverter

Parameters

Name	Default	Description
turns	1000	Number of turns

Modelica definition

model ElectroMagneticConverter 
  
  SI.Voltage v "Voltage drop over the ideal coil";
  SI.Current i "Current through the coil";
  SI.MagneticPotentialDifference V_mag "Magnetic potential difference";
  SI.MagneticFlux Phi "Magnetic flux through the converter";
  parameter Real turns = 1000 "Number of turns";
  
  Modelica.Electrical.Analog.Interfaces.PositivePin p_el;
  Modelica.Electrical.Analog.Interfaces.NegativePin n_el;
  Interfaces.PositiveMagneticPort p_mag;
  Interfaces.NegativeMagneticPort n_mag;
  
equation 
  v = p_el.v - n_el.v;
  i = p_el.i;
  0 = p_el.i + n_el.i;
  
  V_mag = p_mag.V_mag - n_mag.V_mag;
  Phi = p_mag.Phi;
  0 = p_mag.Phi + n_mag.Phi;
  
  V_mag = i * turns;
  turns * der(Phi)  = - v;
  
end ElectroMagneticConverter;

Magnetic.Sources.PermanentMagnet

Parameters

Name	Default	Description
l_PM	0.01	Length of permanent magnet [m]
A_PM	1e-4	Cross sectional area of permanent magnet [m2]
H_c	8e+5	Coercivity [A/m]
B_r	1.2	Residual Induction - Remanence [T]

Modelica definition

model PermanentMagnet 
  "Permanent Magnet with linear demagnetization curve B(H)" 
  
  Magnetic.Reluctance.LinearReluctance R_magPM(
    l=l_PM,
    A=A_PM,
    my_r=B_r/(Modelica.Constants.mue_0*H_c));
  ConstantMagnetomotiveForce theta_PM(theta=H_c*l_PM);
  Interfaces.PositiveMagneticPort p;
  Interfaces.NegativeMagneticPort n;
  
 parameter SI.Length l_PM = 0.01 "Length of permanent magnet";
  parameter SI.Area A_PM = 1e-4 "Cross sectional area of permanent magnet";
  parameter SI.MagneticFieldStrength H_c=8e+5 "Coercivity";
  parameter SI.MagneticFluxDensity B_r=1.2 "Residual Induction - Remanence";
equation 
  connect(theta_PM.n, R_magPM.p);
  
  connect(theta_PM.p, p);
  connect(R_magPM.n, n);
end PermanentMagnet;