Notation format := (generic_format beta fexp).

Theorem FLT_format_plus_small: forall x y, generic_format beta (FLT_exp emin prec) x -> generic_format beta (FLT_exp emin prec) y -> (Rabs (x+y) <= bpow (prec+emin))%R -> generic_format beta (FLT_exp emin prec) (x+y).