NAME
        SPNeg -- Negate the supplied floating point number.
SYNOPSIS
        fnum2 = SPNeg(fnum1)
        D0            D0
        float SPNeg(float fnum1);
FUNCTION
        Accepts a floating point number and returns the value
        of said number after having been subtracted from 0.0.
INPUTS
        fnum1   - floating point number.
RESULT
        fnum2   - floating point negation of fnum1.
BUGS
        None
SEE ALSO