Require Export GeoCoq.Elements.OriginalProofs.lemma_collinear4.
Section Euclid.
Context `{Ax:euclidean_neutral_ruler_compass}.

Lemma lemma_9_5a :
forall A B C P Q R,
TS P A B C -> BetS R P Q -> nCol R Q C -> Col A B R ->
TS Q A B C.