fact: Definition Underf_Err (a a' : float) (ra n:R) := (Closest b radix ra a) /\ (Fbounded b' a') /\ (Rabs (a-a') <= n*powerRZ radix (-(dExp b)))%R /\ ( ((-dExp b) <= Fexp a')%Z -> (FtoRradix a =a')%R).
imports: Reals ZArith List PeanoNat Psatz