model ConstantReluctance "Constant reluctance"
extends FluxTubes.Interfaces.PartialTwoPorts;
parameter SI.Reluctance R_m = 1 "Magnetic reluctance";
equation
V_m = Phi * R_m;
annotation (
defaultComponentName = "reluctance",
Icon(
coordinateSystem(
preserveAspectRatio = false,
extent = {
{-100, -100},
{100, 100}}),
graphics = {
Rectangle(
extent = {
{-70, 30},
{70, -30}},
lineColor = {255, 128, 0},
fillColor = {255, 255, 255},
fillPattern = FillPattern.Solid),
Line(
points = {
{-70, 0},
{-90, 0}},
color = {255, 128, 0}),
Line(
points = {
{70, 0},
{90, 0}},
color = {255, 128, 0}),
Text(
extent = {
{-150, 50},
{150, 90}},
lineColor = {0, 0, 255},
textString = "%name")}),
Documentation(info = "<html>\n<p>\nThis constant reluctance is provided for test purposes and simple magnetic network models. The reluctance is not calculated from geometry and permeability of a flux tube, but is provided as parameter.\n</p>\n</html>"));
end ConstantReluctance;