Require Export GeoCoq.Tarski_dev.Annexes.midpoint_theorems.
Require Export GeoCoq.Highschool.varignon.
Section Exercises.
Context `{TE:Tarski_euclidean}.

(* Specifications: *)
Lemma Per_mid_rectangle : forall A B C I J K,
A <> B ->
B <> C ->
Per B A C ->
Midpoint I B C ->
Midpoint J A C ->
Midpoint K A B ->
Rectangle A J I K.