Require Export GeoCoq.Tarski_dev.Annexes.suma.
Section HalfAngle.
Context `{TnEQD:Tarski_neutral_dimensionless_with_decidable_point_equality}.
Definition HalfA P A O B := ~ Bet A O B /\ InAngle P A O B /\ CongA A O P B O P.

Lemma halfa__lea : forall P A O B, HalfA P A O B -> LeA A O P A O B.