fact: Fixpoint change_nth {T} n (l : list T) f {struct l} := match l with | nil => nil | h :: t => match n with | O => f h :: t | S n => h :: change_nth n t f end end.
imports: Coq(Bool Reals) Flocq(Zaux Raux) Coq(List) Coquelicot(Coquelicot) mathcomp.ssreflect(ssreflect) Stdlib Coquelicot Xreal Xreal_derive Basic Interval Interval_compl Taylor_model Tree Prog