(*******************************************************)
(** * Some properties of cos, sin and tan              *)
(*******************************************************)

Lemma tan_2a :
forall x:R,
cos x <> 0 ->
cos (2 * x) <> 0 ->
1 - tan x * tan x <> 0 -> tan (2 * x) = 2 * tan x / (1 - tan x * tan x).