COBOL Manual for TNS/E Programs (H06.08+, J06.03+)

Example 181 ASIN Function
Code:
DATA DIVISION.
WORKING-STORAGE SECTION.
01 A PICTURE S9V99.
PROCEDURE DIVISION.
MOVE FUNCTION ASIN (-1) TO A.
DISPLAY A.
MOVE FUNCTION ASIN (.25) TO A.
DISPLAY A.
MOVE FUNCTION ASIN (.5) TO A.
DISPLAY A.
MOVE FUNCTION ASIN (.75) TO A.
DISPLAY A.
MOVE FUNCTION ASIN (1) TO A.
DISPLAY A.
Output:
-1.57
0.25
0.52
0.84
1.57
ATAN Function
ATAN, a numeric function, returns a value in radians that approximates the arctangent of its
argument.
argument
is a numeric argument.
The returned value approximates the arctangent of the value of argument. It is a floating-point
number in the range -pi/2 to +pi/2, excluding the endpoints. It has no implied decimal point and
is precise to approximately 14 digits.
ATAN Function 661