model GenericLinearPermanentMagnet "Permanent Magnet with linear characteristic"
extends Interfaces.PartialGeneric;
parameter Material.HardMagnetic.BaseData mat = Material.HardMagnetic.BaseData() "Material"
annotation (
Dialog(group = "Material"),
choicesAllMatching = true);
output SI.MagneticFieldStrength H;
output SI.MagneticFluxDensity B;
equation
B = -mat.B_r + mu_0 * mat.mu_r * H;
Phi = B * A;
V_m = H * l;
annotation (
defaultComponentName = "pm",
Icon(graphics = {
Rectangle(
extent = {
{-70, 30},
{70, -30}},
lineColor = {255, 128, 0},
fillColor = {255, 255, 255},
fillPattern = FillPattern.Solid),
Line(
points = {
{-100, 0},
{-70, 0}},
color = {255, 128, 0}),
Line(
points = {
{70, 0},
{100, 0}},
color = {255, 128, 0}),
Rectangle(
extent = {
{-60, 20},
{-34, -20}},
lineColor = {255, 0, 0},
fillColor = {255, 0, 0},
fillPattern = FillPattern.Solid),
Text(
extent = {
{-20, 13},
{20, -13}},
textStyle = {TextStyle.Bold},
textString = "N",
origin = {-47, 0},
rotation = 90),
Rectangle(
extent = {
{34, 20},
{60, -20}},
lineColor = {0, 127, 0},
fillColor = {0, 127, 0},
fillPattern = FillPattern.Solid),
Text(
extent = {
{-20, 13},
{20, -13}},
textStyle = {TextStyle.Bold},
origin = {47, 0},
rotation = 90,
textString = "S")}),
Documentation(info = "<html>\n<p>\nSimple model of a linear permanent Magnet. Typical characteristics of common permanent magnetic materials can be found at <a href=\"modelica://Modelica.Magnetic.FluxTubes.Material.HardMagnetic\">FluxTubes.Material.HardMagnetic</a>.\n</p>\n\n<p>\nAn overview over all available hysteresis and permanent magnet elements of the package <a href=\"modelica://Modelica.Magnetic.FluxTubes.Shapes.HysteresisAndMagnets\">HysteresisAndMagnets</a> can be found in <a href=\"modelica://Modelica.Magnetic.FluxTubes.UsersGuide.Hysteresis\">UsersGuide.Hysteresis</a>.\n</p>\n\n</html>"));
end GenericLinearPermanentMagnet;