Require Export GeoCoq.Elements.OriginalProofs.lemma_squarerectangle.
Section Euclid.
Context `{Ax:area}.

(* Specifications: *)
Lemma proposition_48A :
forall A B C D a b c d,
SQ A B C D -> SQ a b c d -> EF A B C D a b c d ->
Cong A B a b.