(** Addition of functions *)

Lemma ex_derive_n_plus (f g : R -> R) (n : nat) (x : R) :
locally x (fun y => forall k, (k <= n)%nat -> ex_derive_n f k y) ->
locally x (fun y => forall k, (k <= n)%nat -> ex_derive_n g k y) ->
ex_derive_n (fun x => f x + g x) n x.