AccSensor

model AccSensor "Ideal sensor to measure the absolute acceleration"
    extends Translational.Interfaces.PartialAbsoluteSensor;

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

    annotation (
        Documentation(info = "<html>\n<p>\nMeasures the <em>absolute acceleration a</em>\nof a flange in an ideal way and provides the result as\noutput signals (to be further processed with blocks of the\nModelica.Blocks library).\n</p>\n\n</html>"),
        Icon(
            coordinateSystem(
                preserveAspectRatio = true,
                extent = {
                    {-100, -100}, 
                    {100, 100}}),
            graphics = {
                Text(
                    extent = {
                        {80, -28}, 
                        {115, -60}},
                    textString = "a")}));
end AccSensor;