fact: Definition expn_fast0 prec x := let p := F.prec prec in let thre := F.scale c1 (F.ZtoS (Zneg p)) in let xi := I.bnd x x in let rem := expn_fast0_aux prec thre xi xi i3 i2 (nat_of_P p) in I.sub prec i1 (I.sub prec xi rem).
imports: Coq(Reals Psatz) Flocq(Zaux Raux Digits) Stdlib Xreal Basic Sig Interval Float