(** *** Composition *)
(** Composition with linear functions *)

Lemma is_derive_n_comp_scal (f : R -> R) (a : R) (n : nat) (x l : R) :
locally (a * x) (fun x => forall k, (k <= n)%nat -> ex_derive_n f k x)
-> is_derive_n f n (a * x) l
-> is_derive_n (fun y => f (a * y)) n x (a ^ n * l).