model Disc "1-dim. rotational rigid component without inertia, where right flange is rotated by a fixed angle with respect to left flange"
extends Rotational.Interfaces.PartialTwoFlanges;
parameter SI.Angle deltaPhi = 0 "Fixed rotation of left flange with respect to right flange (= flange_b.phi - flange_a.phi)";
SI.Angle phi "Absolute rotation angle of component";
equation
0 = flange_a.tau + flange_b.tau;
flange_a.phi = phi - 0.5 * deltaPhi;
flange_b.phi = phi + 0.5 * deltaPhi;
annotation (
Documentation(info = "<html>\n<p>\nRotational component with two rigidly connected flanges <strong>without inertia</strong>.\nThe right flange is rotated by the fixed angle \"deltaPhi\" with respect to the left\nflange.\n</p>\n</html>"),
Icon(
coordinateSystem(
preserveAspectRatio = true,
extent = {
{-100, -100},
{100, 100}}),
graphics = {
Rectangle(
lineColor = {64, 64, 64},
fillColor = {192, 192, 192},
fillPattern = FillPattern.HorizontalCylinder,
extent = {
{-30, 10},
{-10, 50}}),
Rectangle(
lineColor = {64, 64, 64},
fillColor = {192, 192, 192},
fillPattern = FillPattern.HorizontalCylinder,
extent = {
{10, -50},
{30, -10}}),
Rectangle(
lineColor = {64, 64, 64},
fillColor = {192, 192, 192},
fillPattern = FillPattern.HorizontalCylinder,
extent = {
{-100, -10},
{100, 10}}),
Rectangle(
lineColor = {64, 64, 64},
fillColor = {192, 192, 192},
fillPattern = FillPattern.HorizontalCylinder,
extent = {
{-10, -50},
{10, 50}}),
Text(
extent = {
{-160, -87},
{160, -62}},
textString = "deltaPhi = %deltaPhi"),
Text(
lineColor = {0, 0, 255},
extent = {
{-150, 60},
{150, 100}},
textString = "%name")}));
end Disc;