      DOUBLE PRECISION FUNCTION MYLOG(A)
      DOUBLE PRECISION A
      MYLOG = DLOG(A)
      RETURN
      END
