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

Intrinsic Functions
HP COBOL Manual for TNS/E Programs—520347-003
14-26
LOG Function
LOG Function
LOG, a numeric function, returns a value that approximates the logarithm to the base e
(natural logarithm) of its argument.
argument
is a numeric argument greater than zero.
The returned value is approximately the logarithm to the base e of the value of
argument.
Example 14-18. LOG Function
Code:
DATA DIVISION.
WORKING-STORAGE SECTION.
01 A PICTURE S9V99.
PROCEDURE DIVISION.
MOVE FUNCTION LOG (1) TO A.
DISPLAY A.
MOVE FUNCTION LOG (10) TO A.
DISPLAY A.
MOVE FUNCTION LOG (100) TO A.
DISPLAY A.
MOVE FUNCTION LOG (1000) TO A.
DISPLAY A.
MOVE FUNCTION LOG (10000) TO A.
DISPLAY A.
Output:
0.00
2.30
4.60
6.90
9.21
( )
LOGFUNCTION argument
VST436.vsd