(** Addition of functions *)

Lemma ex_derive_n_sum_n n (f : nat -> R -> R) (k: nat) (x : R) :
locally x (fun t => forall l j , (l <= n)%nat ->(j <= k)%nat -> ex_derive_n (f l) j t) ->
ex_derive_n (fun y => sum_n (fun j => f j y) n) k x.