Parameter PO : Type.
Parameter vec : PO -> PO -> V.

(* Specifications: *)
Axiom opp_vect : forall A B : PO, vR (opp (vec A B)) (vec B A).
Axiom non_vide_P : exists A : PO, A = A.
Axiom v_vec : forall (u : V) (A : PO), exists B : PO, vR u (vec A B).
Lemma opp_opp : forall u : V, vR (opp (opp u)) u.
intros u; try assumption.