(***************************************************************)
(** Radian -> Degree | Degree -> Radian                        *)
(***************************************************************)

Definition plat : R := 180.Definition toRad (x:R) : R := x * PI * / plat.Definition toDeg (x:R) : R := x * plat * / PI.

Lemma deg_rad : forall x:R, toDeg (toRad x) = x.