Trigonometric functions: Difference between revisions

Content added Content deleted
m (→‎{{header|REXX}}: optimized a function.)
(sql pl)
Line 4,494: Line 4,494:
0.785398163397448 45
0.785398163397448 45
0.785398163397448 45
0.785398163397448 45
</pre>

=={{header|SQL PL}}==
{{works with|Db2 LUW}}
With SQL only:
<lang sql pl>
--Conversion
values degrees(3.1415926);
values radians(180);
-- This is equal to Pi.

--PI/4 45
values sin(radians(180)/4);
values sin(radians(45));
values cos(radians(180)/4);
values cos(radians(45));
values tan(radians(180)/4);
values tan(radians(45));
values cot(radians(180)/4);
values cot(radians(45));
values asin(sin(radians(180)/4));
values asin(sin(radians(45)));
values atan(tan(radians(180)/4));
values atan(tan(radians(45)));

--PI/3 60
values sin(radians(180)/3);
values sin(radians(60));
values cos(radians(180)/3);
values cos(radians(60));
values tan(radians(180)/3);
values tan(radians(60));
values cot(radians(180)/3);
values cot(radians(60));
values asin(sin(radians(180)/3));
values asin(sin(radians(60)));
values atan(tan(radians(180)/3));
values atan(tan(radians(60)));
</lang>
Output:
<pre>
db2 -tx
values degrees(3.1415926)
+1.79999996929531E+002

values radians(180)
+3.14159265358979E+000

values sin(radians(180)/4)
+7.07106781186547E-001

values sin(radians(45))
+7.07106781186547E-001

values cos(radians(180)/4)
+7.07106781186548E-001

values cos(radians(45))
+7.07106781186548E-001

values tan(radians(180)/4)
+1.00000000000000E+000

values tan(radians(45))
+1.00000000000000E+000

values cot(radians(180)/4)
+1.00000000000000E+000

values cot(radians(45))
+1.00000000000000E+000

values asin(sin(radians(180)/4))
+7.85398163397448E-001

values asin(sin(radians(45)))
+7.85398163397448E-001

values atan(tan(radians(180)/4))
+7.85398163397448E-001

values atan(tan(radians(45)))
+7.85398163397448E-001

values sin(radians(180)/3)
+8.66025403784439E-001

values sin(radians(60))
+8.66025403784439E-001

values cos(radians(180)/3)
+5.00000000000000E-001

values cos(radians(60))
+5.00000000000000E-001

values tan(radians(180)/3)
+1.73205080756888E+000

values tan(radians(60))
+1.73205080756888E+000

values cot(radians(180)/3)
+5.77350269189626E-001

values cot(radians(60))
+5.77350269189626E-001

values asin(sin(radians(180)/3))
+1.04719755119660E+000

values asin(sin(radians(60)))
+1.04719755119660E+000

values atan(tan(radians(180)/3))
+1.04719755119660E+000

values atan(tan(radians(60)))
+1.04719755119660E+000
</pre>
</pre>