MPE Home Metamath Proof Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >  perpneq Structured version   Visualization version   GIF version

Theorem perpneq 28696
Description: Two perpendicular lines are different. Theorem 8.14 of [Schwabhauser] p. 59. (Contributed by Thierry Arnoux, 18-Oct-2019.)
Hypotheses
Ref Expression
isperp.p 𝑃 = (Base‘𝐺)
isperp.d = (dist‘𝐺)
isperp.i 𝐼 = (Itv‘𝐺)
isperp.l 𝐿 = (LineG‘𝐺)
isperp.g (𝜑𝐺 ∈ TarskiG)
isperp.a (𝜑𝐴 ∈ ran 𝐿)
isperp.b (𝜑𝐵 ∈ ran 𝐿)
perpcom.1 (𝜑𝐴(⟂G‘𝐺)𝐵)
Assertion
Ref Expression
perpneq (𝜑𝐴𝐵)

Proof of Theorem perpneq
Dummy variables 𝑢 𝑣 𝑥 𝑦 𝑧 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 isperp.p . . . . . . 7 𝑃 = (Base‘𝐺)
2 isperp.i . . . . . . 7 𝐼 = (Itv‘𝐺)
3 isperp.l . . . . . . 7 𝐿 = (LineG‘𝐺)
4 isperp.g . . . . . . . . 9 (𝜑𝐺 ∈ TarskiG)
54adantr 480 . . . . . . . 8 ((𝜑𝑥 ∈ (𝐴𝐵)) → 𝐺 ∈ TarskiG)
65ad5antr 734 . . . . . . 7 (((((((𝜑𝑥 ∈ (𝐴𝐵)) ∧ ∀𝑦𝐴𝑧𝐵 ⟨“𝑦𝑥𝑧”⟩ ∈ (∟G‘𝐺)) ∧ 𝑢𝐴) ∧ 𝑥𝑢) ∧ 𝑣𝐵) ∧ 𝑥𝑣) → 𝐺 ∈ TarskiG)
74ad5antr 734 . . . . . . . . 9 ((((((𝜑𝑥 ∈ (𝐴𝐵)) ∧ 𝑢𝐴) ∧ 𝑥𝑢) ∧ 𝑣𝐵) ∧ 𝑥𝑣) → 𝐺 ∈ TarskiG)
8 isperp.a . . . . . . . . . 10 (𝜑𝐴 ∈ ran 𝐿)
98ad5antr 734 . . . . . . . . 9 ((((((𝜑𝑥 ∈ (𝐴𝐵)) ∧ 𝑢𝐴) ∧ 𝑥𝑢) ∧ 𝑣𝐵) ∧ 𝑥𝑣) → 𝐴 ∈ ran 𝐿)
10 simpr 484 . . . . . . . . . . 11 ((𝜑𝑥 ∈ (𝐴𝐵)) → 𝑥 ∈ (𝐴𝐵))
1110elin1d 4163 . . . . . . . . . 10 ((𝜑𝑥 ∈ (𝐴𝐵)) → 𝑥𝐴)
1211ad4antr 732 . . . . . . . . 9 ((((((𝜑𝑥 ∈ (𝐴𝐵)) ∧ 𝑢𝐴) ∧ 𝑥𝑢) ∧ 𝑣𝐵) ∧ 𝑥𝑣) → 𝑥𝐴)
131, 3, 2, 7, 9, 12tglnpt 28531 . . . . . . . 8 ((((((𝜑𝑥 ∈ (𝐴𝐵)) ∧ 𝑢𝐴) ∧ 𝑥𝑢) ∧ 𝑣𝐵) ∧ 𝑥𝑣) → 𝑥𝑃)
1413adantl4r 755 . . . . . . 7 (((((((𝜑𝑥 ∈ (𝐴𝐵)) ∧ ∀𝑦𝐴𝑧𝐵 ⟨“𝑦𝑥𝑧”⟩ ∈ (∟G‘𝐺)) ∧ 𝑢𝐴) ∧ 𝑥𝑢) ∧ 𝑣𝐵) ∧ 𝑥𝑣) → 𝑥𝑃)
15 isperp.b . . . . . . . . . 10 (𝜑𝐵 ∈ ran 𝐿)
1615ad5antr 734 . . . . . . . . 9 ((((((𝜑𝑥 ∈ (𝐴𝐵)) ∧ 𝑢𝐴) ∧ 𝑥𝑢) ∧ 𝑣𝐵) ∧ 𝑥𝑣) → 𝐵 ∈ ran 𝐿)
17 simplr 768 . . . . . . . . 9 ((((((𝜑𝑥 ∈ (𝐴𝐵)) ∧ 𝑢𝐴) ∧ 𝑥𝑢) ∧ 𝑣𝐵) ∧ 𝑥𝑣) → 𝑣𝐵)
181, 3, 2, 7, 16, 17tglnpt 28531 . . . . . . . 8 ((((((𝜑𝑥 ∈ (𝐴𝐵)) ∧ 𝑢𝐴) ∧ 𝑥𝑢) ∧ 𝑣𝐵) ∧ 𝑥𝑣) → 𝑣𝑃)
1918adantl4r 755 . . . . . . 7 (((((((𝜑𝑥 ∈ (𝐴𝐵)) ∧ ∀𝑦𝐴𝑧𝐵 ⟨“𝑦𝑥𝑧”⟩ ∈ (∟G‘𝐺)) ∧ 𝑢𝐴) ∧ 𝑥𝑢) ∧ 𝑣𝐵) ∧ 𝑥𝑣) → 𝑣𝑃)
20 simp-4r 783 . . . . . . . . 9 ((((((𝜑𝑥 ∈ (𝐴𝐵)) ∧ 𝑢𝐴) ∧ 𝑥𝑢) ∧ 𝑣𝐵) ∧ 𝑥𝑣) → 𝑢𝐴)
211, 3, 2, 7, 9, 20tglnpt 28531 . . . . . . . 8 ((((((𝜑𝑥 ∈ (𝐴𝐵)) ∧ 𝑢𝐴) ∧ 𝑥𝑢) ∧ 𝑣𝐵) ∧ 𝑥𝑣) → 𝑢𝑃)
2221adantl4r 755 . . . . . . 7 (((((((𝜑𝑥 ∈ (𝐴𝐵)) ∧ ∀𝑦𝐴𝑧𝐵 ⟨“𝑦𝑥𝑧”⟩ ∈ (∟G‘𝐺)) ∧ 𝑢𝐴) ∧ 𝑥𝑢) ∧ 𝑣𝐵) ∧ 𝑥𝑣) → 𝑢𝑃)
23 isperp.d . . . . . . . . 9 = (dist‘𝐺)
24 eqid 2729 . . . . . . . . 9 (pInvG‘𝐺) = (pInvG‘𝐺)
25 simp-4r 783 . . . . . . . . . 10 (((((((𝜑𝑥 ∈ (𝐴𝐵)) ∧ ∀𝑦𝐴𝑧𝐵 ⟨“𝑦𝑥𝑧”⟩ ∈ (∟G‘𝐺)) ∧ 𝑢𝐴) ∧ 𝑥𝑢) ∧ 𝑣𝐵) ∧ 𝑥𝑣) → 𝑢𝐴)
26 simplr 768 . . . . . . . . . 10 (((((((𝜑𝑥 ∈ (𝐴𝐵)) ∧ ∀𝑦𝐴𝑧𝐵 ⟨“𝑦𝑥𝑧”⟩ ∈ (∟G‘𝐺)) ∧ 𝑢𝐴) ∧ 𝑥𝑢) ∧ 𝑣𝐵) ∧ 𝑥𝑣) → 𝑣𝐵)
27 simp-5r 785 . . . . . . . . . 10 (((((((𝜑𝑥 ∈ (𝐴𝐵)) ∧ ∀𝑦𝐴𝑧𝐵 ⟨“𝑦𝑥𝑧”⟩ ∈ (∟G‘𝐺)) ∧ 𝑢𝐴) ∧ 𝑥𝑢) ∧ 𝑣𝐵) ∧ 𝑥𝑣) → ∀𝑦𝐴𝑧𝐵 ⟨“𝑦𝑥𝑧”⟩ ∈ (∟G‘𝐺))
28 id 22 . . . . . . . . . . . . 13 (𝑦 = 𝑢𝑦 = 𝑢)
29 eqidd 2730 . . . . . . . . . . . . 13 (𝑦 = 𝑢𝑥 = 𝑥)
30 eqidd 2730 . . . . . . . . . . . . 13 (𝑦 = 𝑢𝑧 = 𝑧)
3128, 29, 30s3eqd 14808 . . . . . . . . . . . 12 (𝑦 = 𝑢 → ⟨“𝑦𝑥𝑧”⟩ = ⟨“𝑢𝑥𝑧”⟩)
3231eleq1d 2813 . . . . . . . . . . 11 (𝑦 = 𝑢 → (⟨“𝑦𝑥𝑧”⟩ ∈ (∟G‘𝐺) ↔ ⟨“𝑢𝑥𝑧”⟩ ∈ (∟G‘𝐺)))
33 eqidd 2730 . . . . . . . . . . . . 13 (𝑧 = 𝑣𝑢 = 𝑢)
34 eqidd 2730 . . . . . . . . . . . . 13 (𝑧 = 𝑣𝑥 = 𝑥)
35 id 22 . . . . . . . . . . . . 13 (𝑧 = 𝑣𝑧 = 𝑣)
3633, 34, 35s3eqd 14808 . . . . . . . . . . . 12 (𝑧 = 𝑣 → ⟨“𝑢𝑥𝑧”⟩ = ⟨“𝑢𝑥𝑣”⟩)
3736eleq1d 2813 . . . . . . . . . . 11 (𝑧 = 𝑣 → (⟨“𝑢𝑥𝑧”⟩ ∈ (∟G‘𝐺) ↔ ⟨“𝑢𝑥𝑣”⟩ ∈ (∟G‘𝐺)))
3832, 37rspc2va 3597 . . . . . . . . . 10 (((𝑢𝐴𝑣𝐵) ∧ ∀𝑦𝐴𝑧𝐵 ⟨“𝑦𝑥𝑧”⟩ ∈ (∟G‘𝐺)) → ⟨“𝑢𝑥𝑣”⟩ ∈ (∟G‘𝐺))
3925, 26, 27, 38syl21anc 837 . . . . . . . . 9 (((((((𝜑𝑥 ∈ (𝐴𝐵)) ∧ ∀𝑦𝐴𝑧𝐵 ⟨“𝑦𝑥𝑧”⟩ ∈ (∟G‘𝐺)) ∧ 𝑢𝐴) ∧ 𝑥𝑢) ∧ 𝑣𝐵) ∧ 𝑥𝑣) → ⟨“𝑢𝑥𝑣”⟩ ∈ (∟G‘𝐺))
40 simpllr 775 . . . . . . . . . . 11 ((((((𝜑𝑥 ∈ (𝐴𝐵)) ∧ 𝑢𝐴) ∧ 𝑥𝑢) ∧ 𝑣𝐵) ∧ 𝑥𝑣) → 𝑥𝑢)
4140necomd 2980 . . . . . . . . . 10 ((((((𝜑𝑥 ∈ (𝐴𝐵)) ∧ 𝑢𝐴) ∧ 𝑥𝑢) ∧ 𝑣𝐵) ∧ 𝑥𝑣) → 𝑢𝑥)
4241adantl4r 755 . . . . . . . . 9 (((((((𝜑𝑥 ∈ (𝐴𝐵)) ∧ ∀𝑦𝐴𝑧𝐵 ⟨“𝑦𝑥𝑧”⟩ ∈ (∟G‘𝐺)) ∧ 𝑢𝐴) ∧ 𝑥𝑢) ∧ 𝑣𝐵) ∧ 𝑥𝑣) → 𝑢𝑥)
43 simpr 484 . . . . . . . . . . 11 ((((((𝜑𝑥 ∈ (𝐴𝐵)) ∧ 𝑢𝐴) ∧ 𝑥𝑢) ∧ 𝑣𝐵) ∧ 𝑥𝑣) → 𝑥𝑣)
4443necomd 2980 . . . . . . . . . 10 ((((((𝜑𝑥 ∈ (𝐴𝐵)) ∧ 𝑢𝐴) ∧ 𝑥𝑢) ∧ 𝑣𝐵) ∧ 𝑥𝑣) → 𝑣𝑥)
4544adantl4r 755 . . . . . . . . 9 (((((((𝜑𝑥 ∈ (𝐴𝐵)) ∧ ∀𝑦𝐴𝑧𝐵 ⟨“𝑦𝑥𝑧”⟩ ∈ (∟G‘𝐺)) ∧ 𝑢𝐴) ∧ 𝑥𝑢) ∧ 𝑣𝐵) ∧ 𝑥𝑣) → 𝑣𝑥)
461, 23, 2, 3, 24, 6, 22, 14, 19, 39, 42, 45ragncol 28691 . . . . . . . 8 (((((((𝜑𝑥 ∈ (𝐴𝐵)) ∧ ∀𝑦𝐴𝑧𝐵 ⟨“𝑦𝑥𝑧”⟩ ∈ (∟G‘𝐺)) ∧ 𝑢𝐴) ∧ 𝑥𝑢) ∧ 𝑣𝐵) ∧ 𝑥𝑣) → ¬ (𝑣 ∈ (𝑢𝐿𝑥) ∨ 𝑢 = 𝑥))
471, 3, 2, 6, 22, 14, 19, 46ncolrot2 28545 . . . . . . 7 (((((((𝜑𝑥 ∈ (𝐴𝐵)) ∧ ∀𝑦𝐴𝑧𝐵 ⟨“𝑦𝑥𝑧”⟩ ∈ (∟G‘𝐺)) ∧ 𝑢𝐴) ∧ 𝑥𝑢) ∧ 𝑣𝐵) ∧ 𝑥𝑣) → ¬ (𝑥 ∈ (𝑣𝐿𝑢) ∨ 𝑣 = 𝑢))
481, 2, 3, 6, 14, 19, 22, 14, 47tglineneq 28626 . . . . . 6 (((((((𝜑𝑥 ∈ (𝐴𝐵)) ∧ ∀𝑦𝐴𝑧𝐵 ⟨“𝑦𝑥𝑧”⟩ ∈ (∟G‘𝐺)) ∧ 𝑢𝐴) ∧ 𝑥𝑢) ∧ 𝑣𝐵) ∧ 𝑥𝑣) → (𝑥𝐿𝑣) ≠ (𝑢𝐿𝑥))
4948necomd 2980 . . . . 5 (((((((𝜑𝑥 ∈ (𝐴𝐵)) ∧ ∀𝑦𝐴𝑧𝐵 ⟨“𝑦𝑥𝑧”⟩ ∈ (∟G‘𝐺)) ∧ 𝑢𝐴) ∧ 𝑥𝑢) ∧ 𝑣𝐵) ∧ 𝑥𝑣) → (𝑢𝐿𝑥) ≠ (𝑥𝐿𝑣))
501, 2, 3, 7, 21, 13, 41, 41, 9, 20, 12tglinethru 28618 . . . . . 6 ((((((𝜑𝑥 ∈ (𝐴𝐵)) ∧ 𝑢𝐴) ∧ 𝑥𝑢) ∧ 𝑣𝐵) ∧ 𝑥𝑣) → 𝐴 = (𝑢𝐿𝑥))
5150adantl4r 755 . . . . 5 (((((((𝜑𝑥 ∈ (𝐴𝐵)) ∧ ∀𝑦𝐴𝑧𝐵 ⟨“𝑦𝑥𝑧”⟩ ∈ (∟G‘𝐺)) ∧ 𝑢𝐴) ∧ 𝑥𝑢) ∧ 𝑣𝐵) ∧ 𝑥𝑣) → 𝐴 = (𝑢𝐿𝑥))
5210elin2d 4164 . . . . . . . 8 ((𝜑𝑥 ∈ (𝐴𝐵)) → 𝑥𝐵)
5352ad4antr 732 . . . . . . 7 ((((((𝜑𝑥 ∈ (𝐴𝐵)) ∧ 𝑢𝐴) ∧ 𝑥𝑢) ∧ 𝑣𝐵) ∧ 𝑥𝑣) → 𝑥𝐵)
541, 2, 3, 7, 13, 18, 43, 43, 16, 53, 17tglinethru 28618 . . . . . 6 ((((((𝜑𝑥 ∈ (𝐴𝐵)) ∧ 𝑢𝐴) ∧ 𝑥𝑢) ∧ 𝑣𝐵) ∧ 𝑥𝑣) → 𝐵 = (𝑥𝐿𝑣))
5554adantl4r 755 . . . . 5 (((((((𝜑𝑥 ∈ (𝐴𝐵)) ∧ ∀𝑦𝐴𝑧𝐵 ⟨“𝑦𝑥𝑧”⟩ ∈ (∟G‘𝐺)) ∧ 𝑢𝐴) ∧ 𝑥𝑢) ∧ 𝑣𝐵) ∧ 𝑥𝑣) → 𝐵 = (𝑥𝐿𝑣))
5649, 51, 553netr4d 3002 . . . 4 (((((((𝜑𝑥 ∈ (𝐴𝐵)) ∧ ∀𝑦𝐴𝑧𝐵 ⟨“𝑦𝑥𝑧”⟩ ∈ (∟G‘𝐺)) ∧ 𝑢𝐴) ∧ 𝑥𝑢) ∧ 𝑣𝐵) ∧ 𝑥𝑣) → 𝐴𝐵)
5715adantr 480 . . . . . 6 ((𝜑𝑥 ∈ (𝐴𝐵)) → 𝐵 ∈ ran 𝐿)
581, 2, 3, 5, 57, 52tglnpt2 28623 . . . . 5 ((𝜑𝑥 ∈ (𝐴𝐵)) → ∃𝑣𝐵 𝑥𝑣)
5958ad3antrrr 730 . . . 4 (((((𝜑𝑥 ∈ (𝐴𝐵)) ∧ ∀𝑦𝐴𝑧𝐵 ⟨“𝑦𝑥𝑧”⟩ ∈ (∟G‘𝐺)) ∧ 𝑢𝐴) ∧ 𝑥𝑢) → ∃𝑣𝐵 𝑥𝑣)
6056, 59r19.29a 3141 . . 3 (((((𝜑𝑥 ∈ (𝐴𝐵)) ∧ ∀𝑦𝐴𝑧𝐵 ⟨“𝑦𝑥𝑧”⟩ ∈ (∟G‘𝐺)) ∧ 𝑢𝐴) ∧ 𝑥𝑢) → 𝐴𝐵)
618adantr 480 . . . . 5 ((𝜑𝑥 ∈ (𝐴𝐵)) → 𝐴 ∈ ran 𝐿)
621, 2, 3, 5, 61, 11tglnpt2 28623 . . . 4 ((𝜑𝑥 ∈ (𝐴𝐵)) → ∃𝑢𝐴 𝑥𝑢)
6362adantr 480 . . 3 (((𝜑𝑥 ∈ (𝐴𝐵)) ∧ ∀𝑦𝐴𝑧𝐵 ⟨“𝑦𝑥𝑧”⟩ ∈ (∟G‘𝐺)) → ∃𝑢𝐴 𝑥𝑢)
6460, 63r19.29a 3141 . 2 (((𝜑𝑥 ∈ (𝐴𝐵)) ∧ ∀𝑦𝐴𝑧𝐵 ⟨“𝑦𝑥𝑧”⟩ ∈ (∟G‘𝐺)) → 𝐴𝐵)
65 perpcom.1 . . 3 (𝜑𝐴(⟂G‘𝐺)𝐵)
661, 23, 2, 3, 4, 8, 15isperp 28694 . . 3 (𝜑 → (𝐴(⟂G‘𝐺)𝐵 ↔ ∃𝑥 ∈ (𝐴𝐵)∀𝑦𝐴𝑧𝐵 ⟨“𝑦𝑥𝑧”⟩ ∈ (∟G‘𝐺)))
6765, 66mpbid 232 . 2 (𝜑 → ∃𝑥 ∈ (𝐴𝐵)∀𝑦𝐴𝑧𝐵 ⟨“𝑦𝑥𝑧”⟩ ∈ (∟G‘𝐺))
6864, 67r19.29a 3141 1 (𝜑𝐴𝐵)
Colors of variables: wff setvar class
Syntax hints:  wi 4  wa 395   = wceq 1540  wcel 2109  wne 2925  wral 3044  wrex 3053  cin 3910   class class class wbr 5102  ran crn 5632  cfv 6500  (class class class)co 7370  ⟨“cs3 14786  Basecbs 17157  distcds 17207  TarskiGcstrkg 28409  Itvcitv 28415  LineGclng 28416  pInvGcmir 28634  ∟Gcrag 28675  ⟂Gcperpg 28677
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1795  ax-4 1809  ax-5 1910  ax-6 1967  ax-7 2008  ax-8 2111  ax-9 2119  ax-10 2142  ax-11 2158  ax-12 2178  ax-ext 2701  ax-rep 5229  ax-sep 5246  ax-nul 5256  ax-pow 5315  ax-pr 5382  ax-un 7692  ax-cnex 11103  ax-resscn 11104  ax-1cn 11105  ax-icn 11106  ax-addcl 11107  ax-addrcl 11108  ax-mulcl 11109  ax-mulrcl 11110  ax-mulcom 11111  ax-addass 11112  ax-mulass 11113  ax-distr 11114  ax-i2m1 11115  ax-1ne0 11116  ax-1rid 11117  ax-rnegex 11118  ax-rrecex 11119  ax-cnre 11120  ax-pre-lttri 11121  ax-pre-lttrn 11122  ax-pre-ltadd 11123  ax-pre-mulgt0 11124
This theorem depends on definitions:  df-bi 207  df-an 396  df-or 848  df-3or 1087  df-3an 1088  df-tru 1543  df-fal 1553  df-ex 1780  df-nf 1784  df-sb 2066  df-mo 2533  df-eu 2562  df-clab 2708  df-cleq 2721  df-clel 2803  df-nfc 2878  df-ne 2926  df-nel 3030  df-ral 3045  df-rex 3054  df-rmo 3351  df-reu 3352  df-rab 3403  df-v 3446  df-sbc 3751  df-csb 3860  df-dif 3914  df-un 3916  df-in 3918  df-ss 3928  df-pss 3931  df-nul 4293  df-if 4485  df-pw 4561  df-sn 4586  df-pr 4588  df-tp 4590  df-op 4592  df-uni 4868  df-int 4907  df-iun 4953  df-br 5103  df-opab 5165  df-mpt 5184  df-tr 5210  df-id 5526  df-eprel 5531  df-po 5539  df-so 5540  df-fr 5584  df-we 5586  df-xp 5637  df-rel 5638  df-cnv 5639  df-co 5640  df-dm 5641  df-rn 5642  df-res 5643  df-ima 5644  df-pred 6263  df-ord 6324  df-on 6325  df-lim 6326  df-suc 6327  df-iota 6453  df-fun 6502  df-fn 6503  df-f 6504  df-f1 6505  df-fo 6506  df-f1o 6507  df-fv 6508  df-riota 7327  df-ov 7373  df-oprab 7374  df-mpo 7375  df-om 7824  df-1st 7948  df-2nd 7949  df-frecs 8238  df-wrecs 8269  df-recs 8318  df-rdg 8356  df-1o 8412  df-oadd 8416  df-er 8649  df-map 8779  df-pm 8780  df-en 8897  df-dom 8898  df-sdom 8899  df-fin 8900  df-dju 9833  df-card 9871  df-pnf 11189  df-mnf 11190  df-xr 11191  df-ltxr 11192  df-le 11193  df-sub 11386  df-neg 11387  df-nn 12166  df-2 12228  df-3 12229  df-n0 12422  df-xnn0 12495  df-z 12509  df-uz 12773  df-fz 13448  df-fzo 13595  df-hash 14275  df-word 14458  df-concat 14515  df-s1 14540  df-s2 14792  df-s3 14793  df-trkgc 28430  df-trkgb 28431  df-trkgcb 28432  df-trkg 28435  df-cgrg 28493  df-mir 28635  df-rag 28676  df-perpg 28678
This theorem is referenced by:  isperp2  28697  footne  28705  lmieu  28766
  Copyright terms: Public domain W3C validator