intros M A B O M' H H0 H1 H2 H3; try assumption.
apply transitive with (cons (vec O A) (vec O B)).
apply angle_inscrit; auto.
apply symetrique; apply angle_inscrit; auto.
Qed.

(* Specifications: *)
Lemma exists_opp_angle : forall a : AV, exists b : AV, R (plus a b) zero.
elim non_vide_V; intros u H; clear H; try exact H.
Lemma exists_opp_angle : forall a : AV, exists b : AV, R (plus a b) zero.
elim non_vide_V; intros u H; clear H; try exact H.