Nuprl Lemma : geo-conga-to-cong3
∀E:BasicGeometry. ∀a,b,c,d,e,f:Point.
  (a ≠ b
  
⇒ c ≠ b
  
⇒ d ≠ e
  
⇒ f ≠ e
  
⇒ abc ≅a def
  
⇒ (∃a',c',d',f':Point. (out(b a'a) ∧ out(b cc') ∧ out(e d'd) ∧ out(e ff') ∧ Cong3(a'bc',d'ef'))))
Proof
Definitions occuring in Statement : 
geo-out: out(p ab)
, 
geo-cong-tri: Cong3(abc,a'b'c')
, 
geo-cong-angle: abc ≅a xyz
, 
basic-geometry: BasicGeometry
, 
geo-sep: a ≠ b
, 
geo-point: Point
, 
all: ∀x:A. B[x]
, 
exists: ∃x:A. B[x]
, 
implies: P 
⇒ Q
, 
and: P ∧ Q
Definitions unfolded in proof : 
all: ∀x:A. B[x]
, 
implies: P 
⇒ Q
, 
geo-cong-angle: abc ≅a xyz
, 
and: P ∧ Q
, 
exists: ∃x:A. B[x]
, 
member: t ∈ T
, 
cand: A c∧ B
, 
geo-out: out(p ab)
, 
basic-geometry: BasicGeometry
, 
not: ¬A
, 
false: False
, 
uall: ∀[x:A]. B[x]
, 
subtype_rel: A ⊆r B
, 
prop: ℙ
, 
geo-cong-tri: Cong3(abc,a'b'c')
, 
uiff: uiff(P;Q)
, 
uimplies: b supposing a
, 
guard: {T}
Lemmas referenced : 
geo-between-sep, 
geo-sep-sym, 
geo-between_wf, 
istype-void, 
geo-congruent-iff-length, 
geo-length-flip, 
geo-out_wf, 
geo-cong-tri_wf, 
geo-cong-angle_wf, 
geo-sep_wf, 
euclidean-plane-structure-subtype, 
euclidean-plane-subtype, 
basic-geometry-subtype, 
subtype_rel_transitivity, 
basic-geometry_wf, 
euclidean-plane_wf, 
euclidean-plane-structure_wf, 
geo-primitives_wf, 
geo-point_wf
Rules used in proof : 
sqequalSubstitution, 
sqequalTransitivity, 
computationStep, 
sqequalReflexivity, 
lambdaFormation_alt, 
sqequalHypSubstitution, 
productElimination, 
thin, 
dependent_pairFormation_alt, 
hypothesisEquality, 
cut, 
introduction, 
extract_by_obid, 
dependent_functionElimination, 
because_Cache, 
independent_functionElimination, 
hypothesis, 
independent_pairFormation, 
voidElimination, 
sqequalRule, 
productIsType, 
functionIsType, 
universeIsType, 
isectElimination, 
applyEquality, 
inhabitedIsType, 
independent_isectElimination, 
equalityTransitivity, 
equalitySymmetry, 
instantiate
Latex:
\mforall{}E:BasicGeometry.  \mforall{}a,b,c,d,e,f:Point.
    (a  \mneq{}  b
    {}\mRightarrow{}  c  \mneq{}  b
    {}\mRightarrow{}  d  \mneq{}  e
    {}\mRightarrow{}  f  \mneq{}  e
    {}\mRightarrow{}  abc  \mcong{}\msuba{}  def
    {}\mRightarrow{}  (\mexists{}a',c',d',f':Point.  (out(b  a'a)  \mwedge{}  out(b  cc')  \mwedge{}  out(e  d'd)  \mwedge{}  out(e  ff')  \mwedge{}  Cong3(a'bc',d'ef'))))
Date html generated:
2019_10_16-PM-01_28_29
Last ObjectModification:
2018_11_07-PM-00_57_51
Theory : euclidean!plane!geometry
Home
Index