[comp.sources.wanted] Source for Epsilon Function

lazer@mnetor.UUCP (Lazer Danzinger) (09/12/89)

    If anyone has code for a function written in 'C' that returns the epsilon
    of its (double) parameter, I would be really appreciative.

    This function is commonly available under Basic as an instrinsic
    function. Its definition is something like this:

    eps(x) = Max (Max(x' - x), (x - x")), epsilon)

    where x' is the successor of x, and x" is the predecessor of x, and
    espilon is the smallest number representable by the computer, eg.
    MINDOUBLE (in values.h), or DBL_MIN (in float.h, under ANSI).

    Thanks in advance.

    Lazer
-- 
-----------------------------------------------------------------------------
Lazer Danzinger      | "Ben Zoma said, 'Who is wise?  One who learns from 
lazer@mnetor         | every  person...Who is courageous?  One who conquers 
                     | his [evil] inclination...Who is wealthy?  One who is 
                     | satisfied with his portion...Who is respected?  One who 
(416) 475-8980       |  respects his fellow man...'"         -- Avot 4:1
----------------------------------------------------------------------------