Section Archimedes_for_angles.
Context `{TnEQD:Tarski_neutral_dimensionless_with_decidable_point_equality}.

Lemma acute_archi_aux1 : forall O A0 A1 B P Q R,
Per O A0 B -> B <> A0 -> Bet A0 A1 B ->
GradA A0 O A1 P Q R -> A0 <> A1 ->
LeA A0 O B P Q R \/ exists A, Bet A0 A1 A /\ Bet A0 A B /\ CongA P Q R A0 O A.