Require Export GeoCoq.Elements.OriginalProofs.lemma_collinearright.
Require Export GeoCoq.Elements.OriginalProofs.lemma_rightreverse.
Require Export GeoCoq.Elements.OriginalProofs.lemma_altitudebisectsbase.
Section Euclid.
Context `{Ax:euclidean_neutral_ruler_compass}.

(* Specifications: *)
Lemma lemma_droppedperpendicularunique :
forall A J M P,
Per A M P -> Per A J P -> Col A M J ->
eq M J.