model EighthOfSphere "Leakage flux through one edge and the opposite plane of an eighth of a sphere"
extends FluxTubes.Interfaces.PartialLeakage;
parameter SI.Radius r = 0.01 "Radius of eighth of sphere"
annotation (Dialog(
group = "Parameters",
groupImage = "modelica://Modelica/Resources/Images/Magnetic/FluxTubes/Shapes/Leakage/EighthOfSphere.png"));
equation
G_m = mu_0 * (0.308) * r;
annotation (Documentation(info = "<html>\n<p>\nIn\n<a href=\"modelica://Modelica.Magnetic.FluxTubes.UsersGuide.Literature\">[Ro41]</a>\nthe equations for determining the reluctance\n<img src=\"modelica://Modelica/Resources/Images/Magnetic/QuasiStatic/FluxTubes/R_m.png\">\nare summarized. As an alternative to the geometry based data a\n<a href=\"modelica://Modelica.Magnetic.QuasiStatic.FluxTubes.Basic.LeakageWithCoefficient\">generic leakage</a> model is provided in this library.\n</p></html>"));
end EighthOfSphere;