Definition bissectrice (I A B C : PO) :=
  R (cons (vec A B) (vec A I)) (cons (vec A I) (vec A C)).

Lemma bissectrice_deux_isoceles : forall I A B C D : PO, bissectrice I A B C -> isocele A B C -> isocele D B C -> R (cons (vec D B) (vec A I)) (cons (vec A I) (vec D C)).