AccSensor

model AccSensor "Ideal sensor to measure the absolute flange angular acceleration"
    extends Rotational.Interfaces.PartialAbsoluteSensor;

    SI.AngularVelocity w "Absolute angular velocity of flange";
    Modelica.Blocks.Interfaces.RealOutput a(unit = "rad/s2") "Absolute angular acceleration of flange as output signal"
        annotation (Placement(transformation(extent = {
            {100, -10}, 
            {120, 10}})));
equation
    a = der(w);
    w = der(flange.phi);

    annotation (
        Documentation(info = "<html>\n<p>\nMeasures the <strong>absolute angular acceleration a</strong> of a flange in an ideal\nway and provides the result as output signal <strong>a</strong> (to be further processed with\nblocks of the Modelica.Blocks library).\n</p>\n</html>"),
        Icon(
            coordinateSystem(
                preserveAspectRatio = true,
                extent = {
                    {-100, -100}, 
                    {100, 100}}),
            graphics = {
                Text(
                    extent = {
                        {70, -30}, 
                        {120, -70}},
                    textString = "a")}));
end AccSensor;