Atan

block Atan "Output the arc tangent of the input"
    extends Interfaces.SISO(y(unit = "rad"));
equation
    y = Modelica.Math.atan(u);

    annotation (
        Icon(
            coordinateSystem(
                preserveAspectRatio = true,
                extent = {
                    {-100, -100}, 
                    {100, 100}}),
            graphics = {
                Polygon(
                    points = {
                        {0, 90}, 
                        {-8, 68}, 
                        {8, 68}, 
                        {0, 90}},
                    lineColor = {192, 192, 192},
                    fillColor = {192, 192, 192},
                    fillPattern = FillPattern.Solid), 
                Line(
                    points = {
                        {0, -80}, 
                        {0, 68}},
                    color = {192, 192, 192}), 
                Line(
                    points = {
                        {-80, -80}, 
                        {-52.7, -75.2}, 
                        {-37.4, -69.7}, 
                        {-26.9, -63}, 
                        {-19.7, -55.2}, 
                        {-14.1, -45.8}, 
                        {-10.1, -36.4}, 
                        {-6.03, -23.9}, 
                        {-1.21, -5.06}, 
                        {5.23, 21}, 
                        {9.25, 34.1}, 
                        {13.3, 44.2}, 
                        {18.1, 52.9}, 
                        {24.5, 60.8}, 
                        {33.4, 67.6}, 
                        {47, 73.6}, 
                        {69.5, 78.6}, 
                        {80, 80}},
                    smooth = Smooth.Bezier), 
                Line(
                    points = {
                        {-90, 0}, 
                        {68, 0}},
                    color = {192, 192, 192}), 
                Polygon(
                    points = {
                        {90, 0}, 
                        {68, 8}, 
                        {68, -8}, 
                        {90, 0}},
                    lineColor = {192, 192, 192},
                    fillColor = {192, 192, 192},
                    fillPattern = FillPattern.Solid), 
                Text(
                    extent = {
                        {-86, 68}, 
                        {-14, 20}},
                    textColor = {192, 192, 192},
                    textString = "atan")}),
        Documentation(info = "<html>\n<p>\nThis blocks computes the output <strong>y</strong> as the\n<em>tangent-inverse</em> of the input <strong>u</strong>:\n</p>\n<blockquote><pre>\ny= <strong>atan</strong>( u );\n</pre></blockquote>\n\n<p>\n<img src=\"modelica://Modelica/Resources/Images/Math/atan.png\"\n     alt=\"atan.png\">\n</p>\n\n</html>"));
end Atan;