Mathbox for Norm Megill |
< Previous
Next >
Nearby theorems |
||
Mirrors > Home > MPE Home > Th. List > Mathboxes > cdleme51finvN | Structured version Visualization version GIF version |
Description: Part of proof of Lemma E in [Crawley] p. 113. TODO: fix comment. (Contributed by NM, 14-Apr-2013.) (New usage is discouraged.) |
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(𝑠 ≤ (𝑃 ∨ 𝑄), (℩𝑦 ∈ 𝐵 ∀𝑡 ∈ 𝐴 ((¬ 𝑡 ≤ 𝑊 ∧ ¬ 𝑡 ≤ (𝑃 ∨ 𝑄)) → 𝑦 = 𝐸)), ⦋𝑠 / 𝑡⦌𝐷) ∨ (𝑥 ∧ 𝑊)))), 𝑥)) |
cdlemef51.v | ⊢ 𝑉 = ((𝑄 ∨ 𝑃) ∧ 𝑊) |
cdlemef51.n | ⊢ 𝑁 = ((𝑣 ∨ 𝑉) ∧ (𝑃 ∨ ((𝑄 ∨ 𝑣) ∧ 𝑊))) |
cdlemefs51.o | ⊢ 𝑂 = ((𝑄 ∨ 𝑃) ∧ (𝑁 ∨ ((𝑢 ∨ 𝑣) ∧ 𝑊))) |
cdlemef51.g | ⊢ 𝐺 = (𝑎 ∈ 𝐵 ↦ if((𝑄 ≠ 𝑃 ∧ ¬ 𝑎 ≤ 𝑊), (℩𝑐 ∈ 𝐵 ∀𝑢 ∈ 𝐴 ((¬ 𝑢 ≤ 𝑊 ∧ (𝑢 ∨ (𝑎 ∧ 𝑊)) = 𝑎) → 𝑐 = (if(𝑢 ≤ (𝑄 ∨ 𝑃), (℩𝑏 ∈ 𝐵 ∀𝑣 ∈ 𝐴 ((¬ 𝑣 ≤ 𝑊 ∧ ¬ 𝑣 ≤ (𝑄 ∨ 𝑃)) → 𝑏 = 𝑂)), ⦋𝑢 / 𝑣⦌𝑁) ∨ (𝑎 ∧ 𝑊)))), 𝑎)) |
Ref | Expression |
---|---|
cdleme51finvN | ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊)) → ◡𝐹 = 𝐺) |
Step | Hyp | Ref | Expression |
---|---|---|---|
1 | cdlemef50.b | . . . . 5 ⊢ 𝐵 = (Base‘𝐾) | |
2 | cdlemef50.l | . . . . 5 ⊢ ≤ = (le‘𝐾) | |
3 | cdlemef50.j | . . . . 5 ⊢ ∨ = (join‘𝐾) | |
4 | cdlemef50.m | . . . . 5 ⊢ ∧ = (meet‘𝐾) | |
5 | cdlemef50.a | . . . . 5 ⊢ 𝐴 = (Atoms‘𝐾) | |
6 | cdlemef50.h | . . . . 5 ⊢ 𝐻 = (LHyp‘𝐾) | |
7 | cdlemef50.u | . . . . 5 ⊢ 𝑈 = ((𝑃 ∨ 𝑄) ∧ 𝑊) | |
8 | cdlemef50.d | . . . . 5 ⊢ 𝐷 = ((𝑡 ∨ 𝑈) ∧ (𝑄 ∨ ((𝑃 ∨ 𝑡) ∧ 𝑊))) | |
9 | cdlemefs50.e | . . . . 5 ⊢ 𝐸 = ((𝑃 ∨ 𝑄) ∧ (𝐷 ∨ ((𝑠 ∨ 𝑡) ∧ 𝑊))) | |
10 | cdlemef50.f | . . . . 5 ⊢ 𝐹 = (𝑥 ∈ 𝐵 ↦ if((𝑃 ≠ 𝑄 ∧ ¬ 𝑥 ≤ 𝑊), (℩𝑧 ∈ 𝐵 ∀𝑠 ∈ 𝐴 ((¬ 𝑠 ≤ 𝑊 ∧ (𝑠 ∨ (𝑥 ∧ 𝑊)) = 𝑥) → 𝑧 = (if(𝑠 ≤ (𝑃 ∨ 𝑄), (℩𝑦 ∈ 𝐵 ∀𝑡 ∈ 𝐴 ((¬ 𝑡 ≤ 𝑊 ∧ ¬ 𝑡 ≤ (𝑃 ∨ 𝑄)) → 𝑦 = 𝐸)), ⦋𝑠 / 𝑡⦌𝐷) ∨ (𝑥 ∧ 𝑊)))), 𝑥)) | |
11 | 1, 2, 3, 4, 5, 6, 7, 8, 9, 10 | cdleme50f1o 37562 | . . . 4 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊)) → 𝐹:𝐵–1-1-onto→𝐵) |
12 | dff1o4 6616 | . . . 4 ⊢ (𝐹:𝐵–1-1-onto→𝐵 ↔ (𝐹 Fn 𝐵 ∧ ◡𝐹 Fn 𝐵)) | |
13 | 11, 12 | sylib 219 | . . 3 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊)) → (𝐹 Fn 𝐵 ∧ ◡𝐹 Fn 𝐵)) |
14 | 13 | simprd 496 | . 2 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊)) → ◡𝐹 Fn 𝐵) |
15 | cdlemef51.v | . . . . 5 ⊢ 𝑉 = ((𝑄 ∨ 𝑃) ∧ 𝑊) | |
16 | cdlemef51.n | . . . . 5 ⊢ 𝑁 = ((𝑣 ∨ 𝑉) ∧ (𝑃 ∨ ((𝑄 ∨ 𝑣) ∧ 𝑊))) | |
17 | cdlemefs51.o | . . . . 5 ⊢ 𝑂 = ((𝑄 ∨ 𝑃) ∧ (𝑁 ∨ ((𝑢 ∨ 𝑣) ∧ 𝑊))) | |
18 | cdlemef51.g | . . . . 5 ⊢ 𝐺 = (𝑎 ∈ 𝐵 ↦ if((𝑄 ≠ 𝑃 ∧ ¬ 𝑎 ≤ 𝑊), (℩𝑐 ∈ 𝐵 ∀𝑢 ∈ 𝐴 ((¬ 𝑢 ≤ 𝑊 ∧ (𝑢 ∨ (𝑎 ∧ 𝑊)) = 𝑎) → 𝑐 = (if(𝑢 ≤ (𝑄 ∨ 𝑃), (℩𝑏 ∈ 𝐵 ∀𝑣 ∈ 𝐴 ((¬ 𝑣 ≤ 𝑊 ∧ ¬ 𝑣 ≤ (𝑄 ∨ 𝑃)) → 𝑏 = 𝑂)), ⦋𝑢 / 𝑣⦌𝑁) ∨ (𝑎 ∧ 𝑊)))), 𝑎)) | |
19 | 1, 2, 3, 4, 5, 6, 15, 16, 17, 18 | cdleme50f1o 37562 | . . . 4 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊) ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊)) → 𝐺:𝐵–1-1-onto→𝐵) |
20 | 19 | 3com23 1118 | . . 3 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊)) → 𝐺:𝐵–1-1-onto→𝐵) |
21 | f1ofn 6609 | . . 3 ⊢ (𝐺:𝐵–1-1-onto→𝐵 → 𝐺 Fn 𝐵) | |
22 | 20, 21 | syl 17 | . 2 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊)) → 𝐺 Fn 𝐵) |
23 | 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 15, 16, 17, 18 | cdleme51finvfvN 37571 | . 2 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊)) ∧ 𝑒 ∈ 𝐵) → (◡𝐹‘𝑒) = (𝐺‘𝑒)) |
24 | 14, 22, 23 | eqfnfvd 6797 | 1 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊)) → ◡𝐹 = 𝐺) |
Colors of variables: wff setvar class |
Syntax hints: ¬ wn 3 → wi 4 ∧ wa 396 ∧ w3a 1079 = wceq 1528 ∈ wcel 2105 ≠ wne 3013 ∀wral 3135 ⦋csb 3880 ifcif 4463 class class class wbr 5057 ↦ cmpt 5137 ◡ccnv 5547 Fn wfn 6343 –1-1-onto→wf1o 6347 ‘cfv 6348 ℩crio 7102 (class class class)co 7145 Basecbs 16471 lecple 16560 joincjn 17542 meetcmee 17543 Atomscatm 36279 HLchlt 36366 LHypclh 37000 |
This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1787 ax-4 1801 ax-5 1902 ax-6 1961 ax-7 2006 ax-8 2107 ax-9 2115 ax-10 2136 ax-11 2151 ax-12 2167 ax-ext 2790 ax-rep 5181 ax-sep 5194 ax-nul 5201 ax-pow 5257 ax-pr 5320 ax-un 7450 ax-riotaBAD 35969 |
This theorem depends on definitions: df-bi 208 df-an 397 df-or 842 df-3or 1080 df-3an 1081 df-tru 1531 df-ex 1772 df-nf 1776 df-sb 2061 df-mo 2615 df-eu 2647 df-clab 2797 df-cleq 2811 df-clel 2890 df-nfc 2960 df-ne 3014 df-ral 3140 df-rex 3141 df-reu 3142 df-rmo 3143 df-rab 3144 df-v 3494 df-sbc 3770 df-csb 3881 df-dif 3936 df-un 3938 df-in 3940 df-ss 3949 df-nul 4289 df-if 4464 df-pw 4537 df-sn 4558 df-pr 4560 df-op 4564 df-uni 4831 df-iun 4912 df-iin 4913 df-br 5058 df-opab 5120 df-mpt 5138 df-id 5453 df-xp 5554 df-rel 5555 df-cnv 5556 df-co 5557 df-dm 5558 df-rn 5559 df-res 5560 df-ima 5561 df-iota 6307 df-fun 6350 df-fn 6351 df-f 6352 df-f1 6353 df-fo 6354 df-f1o 6355 df-fv 6356 df-riota 7103 df-ov 7148 df-oprab 7149 df-mpo 7150 df-1st 7678 df-2nd 7679 df-undef 7928 df-proset 17526 df-poset 17544 df-plt 17556 df-lub 17572 df-glb 17573 df-join 17574 df-meet 17575 df-p0 17637 df-p1 17638 df-lat 17644 df-clat 17706 df-oposet 36192 df-ol 36194 df-oml 36195 df-covers 36282 df-ats 36283 df-atl 36314 df-cvlat 36338 df-hlat 36367 df-llines 36514 df-lplanes 36515 df-lvols 36516 df-lines 36517 df-psubsp 36519 df-pmap 36520 df-padd 36812 df-lhyp 37004 |
This theorem is referenced by: cdleme51finvtrN 37574 |
Copyright terms: Public domain | W3C validator |