(** ** Questions 2 *)
(* 8:38 *)
(** 2.a. *)

(** ** Questions 5 *)
(* 10:08 *)
(** 5.a. *)
(** 5.b. *)
Lemma If : forall x, 0 < x -> is_derive (fun y : R => 2 * ln y + (ln y) ^ 2) x (f x).