Library GeoCoq.Elements.Statements.Book_3
Require Import GeoCoq.Tarski_dev.Annexes.circles.
Require Import GeoCoq.Tarski_dev.Annexes.tangency.
Section Book_3.
Context `{TE:Tarski_2D}.
Proposition 1
To find the centre of a given circle.Proposition 2
If on the circumference of a circle two points are taken at random, the straight line joining the points will fall within the circle.Lemma prop_2 : ∀ O P U V X,
X ≠ U → X ≠ V →
Bet U X V →
OnCircle U O P →
OnCircle V O P →
InCircleS X O P.
Proof.
exact bet_onc2__incs.
Qed.
Proposition 3
If in a circle a straight line passing through the center bisects a straight line not passing through the center, it also cuts it at right angles; and if it cut it at right angles, it also bisects it.Lemma prop_3_1 : ∀ O P A B X,
O≠X → A≠B →
OnCircle A O P →
OnCircle B O P →
Midpoint X A B →
Perp O X A B.
Proof.
exact mid_onc2__perp.
Qed.
Lemma prop_3_2 : ∀ O P A B X,
O≠X → A≠B →
Col A B X →
OnCircle A O P →
OnCircle B O P →
Perp O X A B →
Midpoint X A B.
Proof.
exact col_onc2_perp__mid.
Qed.
Proposition 4
If in a circle two straight lines cut one another which are not through the center, they do not bisect one another.Lemma prop_4 : ∀ O P A B C D X, B ≠ C→ A ≠ B →
OnCircle A O P →
OnCircle B O P →
OnCircle C O P →
OnCircle D O P →
Midpoint X A C →
Midpoint X B D →
X = O.
Proof.
exact mid2_onc4__eq.
Qed.
Proposition 9
If a point is taken within a circle, and more than two equal straight lines fall from the point on the circle, the point taken is the center of the circle.Lemma prop_9 : ∀ O P X A B C, A ≠ B → A ≠ C → B ≠ C →
OnCircle A O P →
OnCircle B O P →
OnCircle C O P →
Cong X A X B →
Cong X A X C →
X = O.
Proof.
exact cong2_onc3__eq.
Qed.
Proposition 11
If two circles touch one another internally, and their centers are taken, the straight line joining their centres, being produced, will fall on the point of contact of the circles.Proposition 12
If two circles touch one another externally, the straight line joining their centers will pass through the point of contact.Lemma prop_11_12 : ∀ A B C D X,
TangentCC A B C D →
OnCircle X A B →
OnCircle X C D →
Col X A C.
Proof.
exact TangentCC_Col.
Qed.