Mathbox for Norm Megill |
< Previous
Next >
Nearby theorems |
||
Mirrors > Home > MPE Home > Th. List > Mathboxes > cdleme50ldil | Structured version Visualization version GIF version |
Description: Part of proof of Lemma D in [Crawley] p. 113. 𝐹 is a lattice dilation. TODO: fix comment. (Contributed by NM, 9-Apr-2013.) |
Ref | Expression |
---|---|
cdlemef50.b | ⊢ 𝐵 = (Base‘𝐾) |
cdlemef50.l | ⊢ ≤ = (le‘𝐾) |
cdlemef50.j | ⊢ ∨ = (join‘𝐾) |
cdlemef50.m | ⊢ ∧ = (meet‘𝐾) |
cdlemef50.a | ⊢ 𝐴 = (Atoms‘𝐾) |
cdlemef50.h | ⊢ 𝐻 = (LHyp‘𝐾) |
cdlemef50.u | ⊢ 𝑈 = ((𝑃 ∨ 𝑄) ∧ 𝑊) |
cdlemef50.d | ⊢ 𝐷 = ((𝑡 ∨ 𝑈) ∧ (𝑄 ∨ ((𝑃 ∨ 𝑡) ∧ 𝑊))) |
cdlemefs50.e | ⊢ 𝐸 = ((𝑃 ∨ 𝑄) ∧ (𝐷 ∨ ((𝑠 ∨ 𝑡) ∧ 𝑊))) |
cdlemef50.f | ⊢ 𝐹 = (𝑥 ∈ 𝐵 ↦ if((𝑃 ≠ 𝑄 ∧ ¬ 𝑥 ≤ 𝑊), (℩𝑧 ∈ 𝐵 ∀𝑠 ∈ 𝐴 ((¬ 𝑠 ≤ 𝑊 ∧ (𝑠 ∨ (𝑥 ∧ 𝑊)) = 𝑥) → 𝑧 = (if(𝑠 ≤ (𝑃 ∨ 𝑄), (℩𝑦 ∈ 𝐵 ∀𝑡 ∈ 𝐴 ((¬ 𝑡 ≤ 𝑊 ∧ ¬ 𝑡 ≤ (𝑃 ∨ 𝑄)) → 𝑦 = 𝐸)), ⦋𝑠 / 𝑡⦌𝐷) ∨ (𝑥 ∧ 𝑊)))), 𝑥)) |
cdleme50ldil.i | ⊢ 𝐶 = ((LDil‘𝐾)‘𝑊) |
Ref | Expression |
---|---|
cdleme50ldil | ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊)) → 𝐹 ∈ 𝐶) |
Step | Hyp | Ref | Expression |
---|---|---|---|
1 | cdlemef50.b | . . 3 ⊢ 𝐵 = (Base‘𝐾) | |
2 | cdlemef50.l | . . 3 ⊢ ≤ = (le‘𝐾) | |
3 | cdlemef50.j | . . 3 ⊢ ∨ = (join‘𝐾) | |
4 | cdlemef50.m | . . 3 ⊢ ∧ = (meet‘𝐾) | |
5 | cdlemef50.a | . . 3 ⊢ 𝐴 = (Atoms‘𝐾) | |
6 | cdlemef50.h | . . 3 ⊢ 𝐻 = (LHyp‘𝐾) | |
7 | cdlemef50.u | . . 3 ⊢ 𝑈 = ((𝑃 ∨ 𝑄) ∧ 𝑊) | |
8 | cdlemef50.d | . . 3 ⊢ 𝐷 = ((𝑡 ∨ 𝑈) ∧ (𝑄 ∨ ((𝑃 ∨ 𝑡) ∧ 𝑊))) | |
9 | cdlemefs50.e | . . 3 ⊢ 𝐸 = ((𝑃 ∨ 𝑄) ∧ (𝐷 ∨ ((𝑠 ∨ 𝑡) ∧ 𝑊))) | |
10 | cdlemef50.f | . . 3 ⊢ 𝐹 = (𝑥 ∈ 𝐵 ↦ if((𝑃 ≠ 𝑄 ∧ ¬ 𝑥 ≤ 𝑊), (℩𝑧 ∈ 𝐵 ∀𝑠 ∈ 𝐴 ((¬ 𝑠 ≤ 𝑊 ∧ (𝑠 ∨ (𝑥 ∧ 𝑊)) = 𝑥) → 𝑧 = (if(𝑠 ≤ (𝑃 ∨ 𝑄), (℩𝑦 ∈ 𝐵 ∀𝑡 ∈ 𝐴 ((¬ 𝑡 ≤ 𝑊 ∧ ¬ 𝑡 ≤ (𝑃 ∨ 𝑄)) → 𝑦 = 𝐸)), ⦋𝑠 / 𝑡⦌𝐷) ∨ (𝑥 ∧ 𝑊)))), 𝑥)) | |
11 | eqid 2821 | . . 3 ⊢ (LAut‘𝐾) = (LAut‘𝐾) | |
12 | 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11 | cdleme50laut 37677 | . 2 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊)) → 𝐹 ∈ (LAut‘𝐾)) |
13 | simpr 487 | . . . . . . 7 ⊢ ((𝑃 ≠ 𝑄 ∧ ¬ 𝑒 ≤ 𝑊) → ¬ 𝑒 ≤ 𝑊) | |
14 | 13 | con2i 141 | . . . . . 6 ⊢ (𝑒 ≤ 𝑊 → ¬ (𝑃 ≠ 𝑄 ∧ ¬ 𝑒 ≤ 𝑊)) |
15 | 10 | cdleme31fv2 37523 | . . . . . 6 ⊢ ((𝑒 ∈ 𝐵 ∧ ¬ (𝑃 ≠ 𝑄 ∧ ¬ 𝑒 ≤ 𝑊)) → (𝐹‘𝑒) = 𝑒) |
16 | 14, 15 | sylan2 594 | . . . . 5 ⊢ ((𝑒 ∈ 𝐵 ∧ 𝑒 ≤ 𝑊) → (𝐹‘𝑒) = 𝑒) |
17 | 16 | ex 415 | . . . 4 ⊢ (𝑒 ∈ 𝐵 → (𝑒 ≤ 𝑊 → (𝐹‘𝑒) = 𝑒)) |
18 | 17 | rgen 3148 | . . 3 ⊢ ∀𝑒 ∈ 𝐵 (𝑒 ≤ 𝑊 → (𝐹‘𝑒) = 𝑒) |
19 | 18 | a1i 11 | . 2 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊)) → ∀𝑒 ∈ 𝐵 (𝑒 ≤ 𝑊 → (𝐹‘𝑒) = 𝑒)) |
20 | cdleme50ldil.i | . . . 4 ⊢ 𝐶 = ((LDil‘𝐾)‘𝑊) | |
21 | 1, 2, 6, 11, 20 | isldil 37240 | . . 3 ⊢ ((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) → (𝐹 ∈ 𝐶 ↔ (𝐹 ∈ (LAut‘𝐾) ∧ ∀𝑒 ∈ 𝐵 (𝑒 ≤ 𝑊 → (𝐹‘𝑒) = 𝑒)))) |
22 | 21 | 3ad2ant1 1129 | . 2 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊)) → (𝐹 ∈ 𝐶 ↔ (𝐹 ∈ (LAut‘𝐾) ∧ ∀𝑒 ∈ 𝐵 (𝑒 ≤ 𝑊 → (𝐹‘𝑒) = 𝑒)))) |
23 | 12, 19, 22 | mpbir2and 711 | 1 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊)) → 𝐹 ∈ 𝐶) |
Colors of variables: wff setvar class |
Syntax hints: ¬ wn 3 → wi 4 ↔ wb 208 ∧ wa 398 ∧ w3a 1083 = wceq 1533 ∈ wcel 2110 ≠ wne 3016 ∀wral 3138 ⦋csb 3883 ifcif 4467 class class class wbr 5059 ↦ cmpt 5139 ‘cfv 6350 ℩crio 7107 (class class class)co 7150 Basecbs 16477 lecple 16566 joincjn 17548 meetcmee 17549 Atomscatm 36393 HLchlt 36480 LHypclh 37114 LAutclaut 37115 LDilcldil 37230 |
This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1792 ax-4 1806 ax-5 1907 ax-6 1966 ax-7 2011 ax-8 2112 ax-9 2120 ax-10 2141 ax-11 2156 ax-12 2172 ax-ext 2793 ax-rep 5183 ax-sep 5196 ax-nul 5203 ax-pow 5259 ax-pr 5322 ax-un 7455 ax-riotaBAD 36083 |
This theorem depends on definitions: df-bi 209 df-an 399 df-or 844 df-3or 1084 df-3an 1085 df-tru 1536 df-ex 1777 df-nf 1781 df-sb 2066 df-mo 2618 df-eu 2650 df-clab 2800 df-cleq 2814 df-clel 2893 df-nfc 2963 df-ne 3017 df-ral 3143 df-rex 3144 df-reu 3145 df-rmo 3146 df-rab 3147 df-v 3497 df-sbc 3773 df-csb 3884 df-dif 3939 df-un 3941 df-in 3943 df-ss 3952 df-nul 4292 df-if 4468 df-pw 4541 df-sn 4562 df-pr 4564 df-op 4568 df-uni 4833 df-iun 4914 df-iin 4915 df-br 5060 df-opab 5122 df-mpt 5140 df-id 5455 df-xp 5556 df-rel 5557 df-cnv 5558 df-co 5559 df-dm 5560 df-rn 5561 df-res 5562 df-ima 5563 df-iota 6309 df-fun 6352 df-fn 6353 df-f 6354 df-f1 6355 df-fo 6356 df-f1o 6357 df-fv 6358 df-riota 7108 df-ov 7153 df-oprab 7154 df-mpo 7155 df-1st 7683 df-2nd 7684 df-undef 7933 df-map 8402 df-proset 17532 df-poset 17550 df-plt 17562 df-lub 17578 df-glb 17579 df-join 17580 df-meet 17581 df-p0 17643 df-p1 17644 df-lat 17650 df-clat 17712 df-oposet 36306 df-ol 36308 df-oml 36309 df-covers 36396 df-ats 36397 df-atl 36428 df-cvlat 36452 df-hlat 36481 df-llines 36628 df-lplanes 36629 df-lvols 36630 df-lines 36631 df-psubsp 36633 df-pmap 36634 df-padd 36926 df-lhyp 37118 df-laut 37119 df-ldil 37234 |
This theorem is referenced by: cdleme50ltrn 37687 |
Copyright terms: Public domain | W3C validator |