    LOG(III)                     4/30/72                     LOG(III)

    NAME
         log - natural logarithm

    SYNOPSIS
         jsr  pc,log

         double log(x)
         double x;

    DESCRIPTION
         The  natural  logarithm  of fr0 is returned in fr0.  From C,
         the natural logarithm of x is returned.

    DIAGNOSTICS
         The error bit (c-bit) is set if the input argument  is  less
         than  or  equal  to zero and the result is a negative number
         very large in magnitude.  From C, there is no error  indica-
         tion.

    BUGS

                                  - 1 -