Nuprl Lemma : geo-line-sep-symmetry
∀g:EuclideanParPlane. ∀l,m:Line.  (((l # m) ∧ (∀L,M,N:Line.  (L \/ M ⇒ (L \/ N ∨ M \/ N)))) ⇒ (m # l))
Proof
Definitions occuring in Statement : 
euclidean-parallel-plane: EuclideanParPlane, 
geo-intersect: L \/ M, 
geo-line-sep: (l # m), 
geo-line: Line, 
all: ∀x:A. B[x], 
implies: P ⇒ Q, 
or: P ∨ Q, 
and: P ∧ Q
Definitions unfolded in proof : 
all: ∀x:A. B[x], 
implies: P ⇒ Q, 
and: P ∧ Q, 
member: t ∈ T, 
uall: ∀[x:A]. B[x], 
subtype_rel: A ⊆r B, 
guard: {T}, 
uimplies: b supposing a, 
prop: ℙ, 
euclidean-parallel-plane: EuclideanParPlane, 
or: P ∨ Q, 
geo-line-sep: (l # m), 
exists: ∃x:A. B[x], 
geo-line: Line, 
pi1: fst(t), 
pi2: snd(t), 
iff: P ⇐⇒ Q, 
cand: A c∧ B, 
rev_implies: P ⇐ Q, 
uiff: uiff(P;Q), 
l_member: (x ∈ l), 
nat: ℕ, 
le: A ≤ B, 
less_than': less_than'(a;b), 
not: ¬A, 
false: False, 
select: L[n], 
cons: [a / b], 
subtract: n - m, 
less_than: a < b, 
squash: ↓T, 
true: True, 
ge: i ≥ j , 
decidable: Dec(P), 
satisfiable_int_formula: satisfiable_int_formula(fmla), 
append: as @ bs, 
so_lambda: so_lambda3, 
so_apply: x[s1;s2;s3], 
geo-colinear-set: geo-colinear-set(e; L), 
l_all: (∀x∈L.P[x]), 
int_seg: {i..j-}, 
lelt: i ≤ j < k
Latex:
\mforall{}g:EuclideanParPlane.  \mforall{}l,m:Line.
    (((l  \#  m)  \mwedge{}  (\mforall{}L,M,N:Line.    (L  \mbackslash{}/  M  {}\mRightarrow{}  (L  \mbackslash{}/  N  \mvee{}  M  \mbackslash{}/  N))))  {}\mRightarrow{}  (m  \#  l))
Date html generated:
2020_05_20-AM-10_47_06
Last ObjectModification:
2020_01_13-PM-06_05_08
Theory : euclidean!plane!geometry
Home
Index