proposition: Theorem FTZ_format_satisfies_any : satisfies_any FTZ_format.
proof: Proof. refine (satisfies_any_eq _ _ _ (generic_format_satisfies_any beta FTZ_exp)). intros x. split. apply FTZ_format_generic. apply generic_format_FTZ. Qed.
imports: Coq(ZArith Reals Lia) Zaux Raux Defs Round_pred Generic_fmt Float_prop Ulp FLX