Comment 1 for bug 160975

In scheme/ikarus.numerics.ss change the $fl> in the definition
of flabs to $fl< .

  (define (flabs x)
    (if (flonum? x)
        (if ($fl< x 0.0)
            ($fl* x -1.0)
            x)
        (error 'flabs "not a flonum" x)))