Nuprl Lemma : line-circle-continuity1
∀e:EuclideanPlane. ∀a,b,p:Point. ∀q:{q:Point| ¬(q = p ∈ Point)} .
((∃x:{x:Point| a_x_b} . ∃y:{y:Point| a_b_y} . (ap=ax ∧ aq=ay)) ⇒ (∃y,z:Point. (ay=ab ∧ az=ab ∧ z_p_q ∧ p_y_q)))
Proof
Definitions occuring in Statement :
euclidean-plane: EuclideanPlane,
eu-between-eq: a_b_c,
eu-congruent: ab=cd,
eu-point: Point,
all: ∀x:A. B[x],
exists: ∃x:A. B[x],
not: ¬A,
implies: P ⇒ Q,
and: P ∧ Q,
set: {x:A| B[x]} ,
equal: s = t ∈ T
Definitions unfolded in proof :
all: ∀x:A. B[x],
implies: P ⇒ Q,
exists: ∃x:A. B[x],
and: P ∧ Q,
member: t ∈ T,
uall: ∀[x:A]. B[x],
euclidean-plane: EuclideanPlane,
prop: ℙ,
cand: A c∧ B,
not: ¬A,
false: False,
subtype_rel: A ⊆r B,
so_lambda: λ2x.t[x],
so_apply: x[s],
uimplies: b supposing a,
top: Top,
euclidean-axioms: euclidean-axioms(e),
sq_stable: SqStable(P),
squash: ↓T,
let: let,
pi1: fst(t),
pi2: snd(t)
Lemmas referenced :
sq_stable__eu-between-eq,
sq_stable__eu-congruent,
sq_stable__and,
euclidean-plane_wf,
set_wf,
exists_wf,
eu-between-eq_wf,
pi2_wf,
top_wf,
subtype_rel_product,
pi1_wf_top,
not_wf,
and_wf,
eu-point_wf,
equal_wf,
eu-congruent_wf,
eu-line-circle_wf
Rules used in proof :
sqequalSubstitution,
sqequalTransitivity,
computationStep,
sqequalReflexivity,
lambdaFormation,
sqequalHypSubstitution,
productElimination,
thin,
dependent_pairFormation,
cut,
lemma_by_obid,
isectElimination,
because_Cache,
hypothesisEquality,
dependent_set_memberEquality,
hypothesis,
setElimination,
rename,
independent_pairFormation,
independent_functionElimination,
voidElimination,
productEquality,
applyEquality,
sqequalRule,
lambdaEquality,
independent_isectElimination,
isect_memberEquality,
voidEquality,
equalityEquality,
equalityTransitivity,
equalitySymmetry,
dependent_functionElimination,
setEquality,
introduction,
imageMemberEquality,
baseClosed,
imageElimination,
isectEquality
Latex:
\mforall{}e:EuclideanPlane. \mforall{}a,b,p:Point. \mforall{}q:\{q:Point| \mneg{}(q = p)\} .
((\mexists{}x:\{x:Point| a\_x\_b\} . \mexists{}y:\{y:Point| a\_b\_y\} . (ap=ax \mwedge{} aq=ay))
{}\mRightarrow{} (\mexists{}y,z:Point. (ay=ab \mwedge{} az=ab \mwedge{} z\_p\_q \mwedge{} p\_y\_q)))
Date html generated:
2016_05_18-AM-06_41_35
Last ObjectModification:
2016_01_16-PM-10_29_31
Theory : euclidean!geometry
Home
Index