Proof of Theorem elpaddn0
| Step | Hyp | Ref | Expression | 
|---|
| 1 |  | paddfval.l | . . . 4
⊢  ≤ =
(le‘𝐾) | 
| 2 |  | paddfval.j | . . . 4
⊢  ∨ =
(join‘𝐾) | 
| 3 |  | paddfval.a | . . . 4
⊢ 𝐴 = (Atoms‘𝐾) | 
| 4 |  | paddfval.p | . . . 4
⊢  + =
(+𝑃‘𝐾) | 
| 5 | 1, 2, 3, 4 | elpadd 39802 | . . 3
⊢ ((𝐾 ∈ Lat ∧ 𝑋 ⊆ 𝐴 ∧ 𝑌 ⊆ 𝐴) → (𝑆 ∈ (𝑋 + 𝑌) ↔ ((𝑆 ∈ 𝑋 ∨ 𝑆 ∈ 𝑌) ∨ (𝑆 ∈ 𝐴 ∧ ∃𝑞 ∈ 𝑋 ∃𝑟 ∈ 𝑌 𝑆 ≤ (𝑞 ∨ 𝑟))))) | 
| 6 | 5 | adantr 480 | . 2
⊢ (((𝐾 ∈ Lat ∧ 𝑋 ⊆ 𝐴 ∧ 𝑌 ⊆ 𝐴) ∧ (𝑋 ≠ ∅ ∧ 𝑌 ≠ ∅)) → (𝑆 ∈ (𝑋 + 𝑌) ↔ ((𝑆 ∈ 𝑋 ∨ 𝑆 ∈ 𝑌) ∨ (𝑆 ∈ 𝐴 ∧ ∃𝑞 ∈ 𝑋 ∃𝑟 ∈ 𝑌 𝑆 ≤ (𝑞 ∨ 𝑟))))) | 
| 7 |  | simpl2 1192 | . . . . . 6
⊢ (((𝐾 ∈ Lat ∧ 𝑋 ⊆ 𝐴 ∧ 𝑌 ⊆ 𝐴) ∧ (𝑋 ≠ ∅ ∧ 𝑌 ≠ ∅)) → 𝑋 ⊆ 𝐴) | 
| 8 | 7 | sseld 3981 | . . . . 5
⊢ (((𝐾 ∈ Lat ∧ 𝑋 ⊆ 𝐴 ∧ 𝑌 ⊆ 𝐴) ∧ (𝑋 ≠ ∅ ∧ 𝑌 ≠ ∅)) → (𝑆 ∈ 𝑋 → 𝑆 ∈ 𝐴)) | 
| 9 |  | simpll1 1212 | . . . . . . . . . . . . 13
⊢ ((((𝐾 ∈ Lat ∧ 𝑋 ⊆ 𝐴 ∧ 𝑌 ⊆ 𝐴) ∧ 𝑆 ∈ 𝑋) ∧ 𝑟 ∈ 𝑌) → 𝐾 ∈ Lat) | 
| 10 |  | ssel2 3977 | . . . . . . . . . . . . . . . 16
⊢ ((𝑋 ⊆ 𝐴 ∧ 𝑆 ∈ 𝑋) → 𝑆 ∈ 𝐴) | 
| 11 | 10 | 3ad2antl2 1186 | . . . . . . . . . . . . . . 15
⊢ (((𝐾 ∈ Lat ∧ 𝑋 ⊆ 𝐴 ∧ 𝑌 ⊆ 𝐴) ∧ 𝑆 ∈ 𝑋) → 𝑆 ∈ 𝐴) | 
| 12 | 11 | adantr 480 | . . . . . . . . . . . . . 14
⊢ ((((𝐾 ∈ Lat ∧ 𝑋 ⊆ 𝐴 ∧ 𝑌 ⊆ 𝐴) ∧ 𝑆 ∈ 𝑋) ∧ 𝑟 ∈ 𝑌) → 𝑆 ∈ 𝐴) | 
| 13 |  | eqid 2736 | . . . . . . . . . . . . . . 15
⊢
(Base‘𝐾) =
(Base‘𝐾) | 
| 14 | 13, 3 | atbase 39291 | . . . . . . . . . . . . . 14
⊢ (𝑆 ∈ 𝐴 → 𝑆 ∈ (Base‘𝐾)) | 
| 15 | 12, 14 | syl 17 | . . . . . . . . . . . . 13
⊢ ((((𝐾 ∈ Lat ∧ 𝑋 ⊆ 𝐴 ∧ 𝑌 ⊆ 𝐴) ∧ 𝑆 ∈ 𝑋) ∧ 𝑟 ∈ 𝑌) → 𝑆 ∈ (Base‘𝐾)) | 
| 16 |  | simpl3 1193 | . . . . . . . . . . . . . . 15
⊢ (((𝐾 ∈ Lat ∧ 𝑋 ⊆ 𝐴 ∧ 𝑌 ⊆ 𝐴) ∧ 𝑆 ∈ 𝑋) → 𝑌 ⊆ 𝐴) | 
| 17 | 16 | sselda 3982 | . . . . . . . . . . . . . 14
⊢ ((((𝐾 ∈ Lat ∧ 𝑋 ⊆ 𝐴 ∧ 𝑌 ⊆ 𝐴) ∧ 𝑆 ∈ 𝑋) ∧ 𝑟 ∈ 𝑌) → 𝑟 ∈ 𝐴) | 
| 18 | 13, 3 | atbase 39291 | . . . . . . . . . . . . . 14
⊢ (𝑟 ∈ 𝐴 → 𝑟 ∈ (Base‘𝐾)) | 
| 19 | 17, 18 | syl 17 | . . . . . . . . . . . . 13
⊢ ((((𝐾 ∈ Lat ∧ 𝑋 ⊆ 𝐴 ∧ 𝑌 ⊆ 𝐴) ∧ 𝑆 ∈ 𝑋) ∧ 𝑟 ∈ 𝑌) → 𝑟 ∈ (Base‘𝐾)) | 
| 20 | 13, 1, 2 | latlej1 18494 | . . . . . . . . . . . . 13
⊢ ((𝐾 ∈ Lat ∧ 𝑆 ∈ (Base‘𝐾) ∧ 𝑟 ∈ (Base‘𝐾)) → 𝑆 ≤ (𝑆 ∨ 𝑟)) | 
| 21 | 9, 15, 19, 20 | syl3anc 1372 | . . . . . . . . . . . 12
⊢ ((((𝐾 ∈ Lat ∧ 𝑋 ⊆ 𝐴 ∧ 𝑌 ⊆ 𝐴) ∧ 𝑆 ∈ 𝑋) ∧ 𝑟 ∈ 𝑌) → 𝑆 ≤ (𝑆 ∨ 𝑟)) | 
| 22 | 21 | reximdva0 4354 | . . . . . . . . . . 11
⊢ ((((𝐾 ∈ Lat ∧ 𝑋 ⊆ 𝐴 ∧ 𝑌 ⊆ 𝐴) ∧ 𝑆 ∈ 𝑋) ∧ 𝑌 ≠ ∅) → ∃𝑟 ∈ 𝑌 𝑆 ≤ (𝑆 ∨ 𝑟)) | 
| 23 | 22 | exp31 419 | . . . . . . . . . 10
⊢ ((𝐾 ∈ Lat ∧ 𝑋 ⊆ 𝐴 ∧ 𝑌 ⊆ 𝐴) → (𝑆 ∈ 𝑋 → (𝑌 ≠ ∅ → ∃𝑟 ∈ 𝑌 𝑆 ≤ (𝑆 ∨ 𝑟)))) | 
| 24 | 23 | com23 86 | . . . . . . . . 9
⊢ ((𝐾 ∈ Lat ∧ 𝑋 ⊆ 𝐴 ∧ 𝑌 ⊆ 𝐴) → (𝑌 ≠ ∅ → (𝑆 ∈ 𝑋 → ∃𝑟 ∈ 𝑌 𝑆 ≤ (𝑆 ∨ 𝑟)))) | 
| 25 | 24 | imp 406 | . . . . . . . 8
⊢ (((𝐾 ∈ Lat ∧ 𝑋 ⊆ 𝐴 ∧ 𝑌 ⊆ 𝐴) ∧ 𝑌 ≠ ∅) → (𝑆 ∈ 𝑋 → ∃𝑟 ∈ 𝑌 𝑆 ≤ (𝑆 ∨ 𝑟))) | 
| 26 | 25 | ancld 550 | . . . . . . 7
⊢ (((𝐾 ∈ Lat ∧ 𝑋 ⊆ 𝐴 ∧ 𝑌 ⊆ 𝐴) ∧ 𝑌 ≠ ∅) → (𝑆 ∈ 𝑋 → (𝑆 ∈ 𝑋 ∧ ∃𝑟 ∈ 𝑌 𝑆 ≤ (𝑆 ∨ 𝑟)))) | 
| 27 |  | oveq1 7439 | . . . . . . . . . 10
⊢ (𝑞 = 𝑆 → (𝑞 ∨ 𝑟) = (𝑆 ∨ 𝑟)) | 
| 28 | 27 | breq2d 5154 | . . . . . . . . 9
⊢ (𝑞 = 𝑆 → (𝑆 ≤ (𝑞 ∨ 𝑟) ↔ 𝑆 ≤ (𝑆 ∨ 𝑟))) | 
| 29 | 28 | rexbidv 3178 | . . . . . . . 8
⊢ (𝑞 = 𝑆 → (∃𝑟 ∈ 𝑌 𝑆 ≤ (𝑞 ∨ 𝑟) ↔ ∃𝑟 ∈ 𝑌 𝑆 ≤ (𝑆 ∨ 𝑟))) | 
| 30 | 29 | rspcev 3621 | . . . . . . 7
⊢ ((𝑆 ∈ 𝑋 ∧ ∃𝑟 ∈ 𝑌 𝑆 ≤ (𝑆 ∨ 𝑟)) → ∃𝑞 ∈ 𝑋 ∃𝑟 ∈ 𝑌 𝑆 ≤ (𝑞 ∨ 𝑟)) | 
| 31 | 26, 30 | syl6 35 | . . . . . 6
⊢ (((𝐾 ∈ Lat ∧ 𝑋 ⊆ 𝐴 ∧ 𝑌 ⊆ 𝐴) ∧ 𝑌 ≠ ∅) → (𝑆 ∈ 𝑋 → ∃𝑞 ∈ 𝑋 ∃𝑟 ∈ 𝑌 𝑆 ≤ (𝑞 ∨ 𝑟))) | 
| 32 | 31 | adantrl 716 | . . . . 5
⊢ (((𝐾 ∈ Lat ∧ 𝑋 ⊆ 𝐴 ∧ 𝑌 ⊆ 𝐴) ∧ (𝑋 ≠ ∅ ∧ 𝑌 ≠ ∅)) → (𝑆 ∈ 𝑋 → ∃𝑞 ∈ 𝑋 ∃𝑟 ∈ 𝑌 𝑆 ≤ (𝑞 ∨ 𝑟))) | 
| 33 | 8, 32 | jcad 512 | . . . 4
⊢ (((𝐾 ∈ Lat ∧ 𝑋 ⊆ 𝐴 ∧ 𝑌 ⊆ 𝐴) ∧ (𝑋 ≠ ∅ ∧ 𝑌 ≠ ∅)) → (𝑆 ∈ 𝑋 → (𝑆 ∈ 𝐴 ∧ ∃𝑞 ∈ 𝑋 ∃𝑟 ∈ 𝑌 𝑆 ≤ (𝑞 ∨ 𝑟)))) | 
| 34 |  | simpl3 1193 | . . . . . 6
⊢ (((𝐾 ∈ Lat ∧ 𝑋 ⊆ 𝐴 ∧ 𝑌 ⊆ 𝐴) ∧ (𝑋 ≠ ∅ ∧ 𝑌 ≠ ∅)) → 𝑌 ⊆ 𝐴) | 
| 35 | 34 | sseld 3981 | . . . . 5
⊢ (((𝐾 ∈ Lat ∧ 𝑋 ⊆ 𝐴 ∧ 𝑌 ⊆ 𝐴) ∧ (𝑋 ≠ ∅ ∧ 𝑌 ≠ ∅)) → (𝑆 ∈ 𝑌 → 𝑆 ∈ 𝐴)) | 
| 36 |  | simpll1 1212 | . . . . . . . . . . . . . . 15
⊢ ((((𝐾 ∈ Lat ∧ 𝑋 ⊆ 𝐴 ∧ 𝑌 ⊆ 𝐴) ∧ 𝑞 ∈ 𝑋) ∧ 𝑆 ∈ 𝑌) → 𝐾 ∈ Lat) | 
| 37 |  | ssel2 3977 | . . . . . . . . . . . . . . . . . 18
⊢ ((𝑋 ⊆ 𝐴 ∧ 𝑞 ∈ 𝑋) → 𝑞 ∈ 𝐴) | 
| 38 | 37 | 3ad2antl2 1186 | . . . . . . . . . . . . . . . . 17
⊢ (((𝐾 ∈ Lat ∧ 𝑋 ⊆ 𝐴 ∧ 𝑌 ⊆ 𝐴) ∧ 𝑞 ∈ 𝑋) → 𝑞 ∈ 𝐴) | 
| 39 | 38 | adantr 480 | . . . . . . . . . . . . . . . 16
⊢ ((((𝐾 ∈ Lat ∧ 𝑋 ⊆ 𝐴 ∧ 𝑌 ⊆ 𝐴) ∧ 𝑞 ∈ 𝑋) ∧ 𝑆 ∈ 𝑌) → 𝑞 ∈ 𝐴) | 
| 40 | 13, 3 | atbase 39291 | . . . . . . . . . . . . . . . 16
⊢ (𝑞 ∈ 𝐴 → 𝑞 ∈ (Base‘𝐾)) | 
| 41 | 39, 40 | syl 17 | . . . . . . . . . . . . . . 15
⊢ ((((𝐾 ∈ Lat ∧ 𝑋 ⊆ 𝐴 ∧ 𝑌 ⊆ 𝐴) ∧ 𝑞 ∈ 𝑋) ∧ 𝑆 ∈ 𝑌) → 𝑞 ∈ (Base‘𝐾)) | 
| 42 |  | simpl3 1193 | . . . . . . . . . . . . . . . . 17
⊢ (((𝐾 ∈ Lat ∧ 𝑋 ⊆ 𝐴 ∧ 𝑌 ⊆ 𝐴) ∧ 𝑞 ∈ 𝑋) → 𝑌 ⊆ 𝐴) | 
| 43 | 42 | sselda 3982 | . . . . . . . . . . . . . . . 16
⊢ ((((𝐾 ∈ Lat ∧ 𝑋 ⊆ 𝐴 ∧ 𝑌 ⊆ 𝐴) ∧ 𝑞 ∈ 𝑋) ∧ 𝑆 ∈ 𝑌) → 𝑆 ∈ 𝐴) | 
| 44 | 43, 14 | syl 17 | . . . . . . . . . . . . . . 15
⊢ ((((𝐾 ∈ Lat ∧ 𝑋 ⊆ 𝐴 ∧ 𝑌 ⊆ 𝐴) ∧ 𝑞 ∈ 𝑋) ∧ 𝑆 ∈ 𝑌) → 𝑆 ∈ (Base‘𝐾)) | 
| 45 | 13, 1, 2 | latlej2 18495 | . . . . . . . . . . . . . . 15
⊢ ((𝐾 ∈ Lat ∧ 𝑞 ∈ (Base‘𝐾) ∧ 𝑆 ∈ (Base‘𝐾)) → 𝑆 ≤ (𝑞 ∨ 𝑆)) | 
| 46 | 36, 41, 44, 45 | syl3anc 1372 | . . . . . . . . . . . . . 14
⊢ ((((𝐾 ∈ Lat ∧ 𝑋 ⊆ 𝐴 ∧ 𝑌 ⊆ 𝐴) ∧ 𝑞 ∈ 𝑋) ∧ 𝑆 ∈ 𝑌) → 𝑆 ≤ (𝑞 ∨ 𝑆)) | 
| 47 | 46 | ex 412 | . . . . . . . . . . . . 13
⊢ (((𝐾 ∈ Lat ∧ 𝑋 ⊆ 𝐴 ∧ 𝑌 ⊆ 𝐴) ∧ 𝑞 ∈ 𝑋) → (𝑆 ∈ 𝑌 → 𝑆 ≤ (𝑞 ∨ 𝑆))) | 
| 48 | 47 | ancld 550 | . . . . . . . . . . . 12
⊢ (((𝐾 ∈ Lat ∧ 𝑋 ⊆ 𝐴 ∧ 𝑌 ⊆ 𝐴) ∧ 𝑞 ∈ 𝑋) → (𝑆 ∈ 𝑌 → (𝑆 ∈ 𝑌 ∧ 𝑆 ≤ (𝑞 ∨ 𝑆)))) | 
| 49 |  | oveq2 7440 | . . . . . . . . . . . . . 14
⊢ (𝑟 = 𝑆 → (𝑞 ∨ 𝑟) = (𝑞 ∨ 𝑆)) | 
| 50 | 49 | breq2d 5154 | . . . . . . . . . . . . 13
⊢ (𝑟 = 𝑆 → (𝑆 ≤ (𝑞 ∨ 𝑟) ↔ 𝑆 ≤ (𝑞 ∨ 𝑆))) | 
| 51 | 50 | rspcev 3621 | . . . . . . . . . . . 12
⊢ ((𝑆 ∈ 𝑌 ∧ 𝑆 ≤ (𝑞 ∨ 𝑆)) → ∃𝑟 ∈ 𝑌 𝑆 ≤ (𝑞 ∨ 𝑟)) | 
| 52 | 48, 51 | syl6 35 | . . . . . . . . . . 11
⊢ (((𝐾 ∈ Lat ∧ 𝑋 ⊆ 𝐴 ∧ 𝑌 ⊆ 𝐴) ∧ 𝑞 ∈ 𝑋) → (𝑆 ∈ 𝑌 → ∃𝑟 ∈ 𝑌 𝑆 ≤ (𝑞 ∨ 𝑟))) | 
| 53 | 52 | impancom 451 | . . . . . . . . . 10
⊢ (((𝐾 ∈ Lat ∧ 𝑋 ⊆ 𝐴 ∧ 𝑌 ⊆ 𝐴) ∧ 𝑆 ∈ 𝑌) → (𝑞 ∈ 𝑋 → ∃𝑟 ∈ 𝑌 𝑆 ≤ (𝑞 ∨ 𝑟))) | 
| 54 | 53 | ancld 550 | . . . . . . . . 9
⊢ (((𝐾 ∈ Lat ∧ 𝑋 ⊆ 𝐴 ∧ 𝑌 ⊆ 𝐴) ∧ 𝑆 ∈ 𝑌) → (𝑞 ∈ 𝑋 → (𝑞 ∈ 𝑋 ∧ ∃𝑟 ∈ 𝑌 𝑆 ≤ (𝑞 ∨ 𝑟)))) | 
| 55 | 54 | eximdv 1916 | . . . . . . . 8
⊢ (((𝐾 ∈ Lat ∧ 𝑋 ⊆ 𝐴 ∧ 𝑌 ⊆ 𝐴) ∧ 𝑆 ∈ 𝑌) → (∃𝑞 𝑞 ∈ 𝑋 → ∃𝑞(𝑞 ∈ 𝑋 ∧ ∃𝑟 ∈ 𝑌 𝑆 ≤ (𝑞 ∨ 𝑟)))) | 
| 56 |  | n0 4352 | . . . . . . . 8
⊢ (𝑋 ≠ ∅ ↔
∃𝑞 𝑞 ∈ 𝑋) | 
| 57 |  | df-rex 3070 | . . . . . . . 8
⊢
(∃𝑞 ∈
𝑋 ∃𝑟 ∈ 𝑌 𝑆 ≤ (𝑞 ∨ 𝑟) ↔ ∃𝑞(𝑞 ∈ 𝑋 ∧ ∃𝑟 ∈ 𝑌 𝑆 ≤ (𝑞 ∨ 𝑟))) | 
| 58 | 55, 56, 57 | 3imtr4g 296 | . . . . . . 7
⊢ (((𝐾 ∈ Lat ∧ 𝑋 ⊆ 𝐴 ∧ 𝑌 ⊆ 𝐴) ∧ 𝑆 ∈ 𝑌) → (𝑋 ≠ ∅ → ∃𝑞 ∈ 𝑋 ∃𝑟 ∈ 𝑌 𝑆 ≤ (𝑞 ∨ 𝑟))) | 
| 59 | 58 | impancom 451 | . . . . . 6
⊢ (((𝐾 ∈ Lat ∧ 𝑋 ⊆ 𝐴 ∧ 𝑌 ⊆ 𝐴) ∧ 𝑋 ≠ ∅) → (𝑆 ∈ 𝑌 → ∃𝑞 ∈ 𝑋 ∃𝑟 ∈ 𝑌 𝑆 ≤ (𝑞 ∨ 𝑟))) | 
| 60 | 59 | adantrr 717 | . . . . 5
⊢ (((𝐾 ∈ Lat ∧ 𝑋 ⊆ 𝐴 ∧ 𝑌 ⊆ 𝐴) ∧ (𝑋 ≠ ∅ ∧ 𝑌 ≠ ∅)) → (𝑆 ∈ 𝑌 → ∃𝑞 ∈ 𝑋 ∃𝑟 ∈ 𝑌 𝑆 ≤ (𝑞 ∨ 𝑟))) | 
| 61 | 35, 60 | jcad 512 | . . . 4
⊢ (((𝐾 ∈ Lat ∧ 𝑋 ⊆ 𝐴 ∧ 𝑌 ⊆ 𝐴) ∧ (𝑋 ≠ ∅ ∧ 𝑌 ≠ ∅)) → (𝑆 ∈ 𝑌 → (𝑆 ∈ 𝐴 ∧ ∃𝑞 ∈ 𝑋 ∃𝑟 ∈ 𝑌 𝑆 ≤ (𝑞 ∨ 𝑟)))) | 
| 62 | 33, 61 | jaod 859 | . . 3
⊢ (((𝐾 ∈ Lat ∧ 𝑋 ⊆ 𝐴 ∧ 𝑌 ⊆ 𝐴) ∧ (𝑋 ≠ ∅ ∧ 𝑌 ≠ ∅)) → ((𝑆 ∈ 𝑋 ∨ 𝑆 ∈ 𝑌) → (𝑆 ∈ 𝐴 ∧ ∃𝑞 ∈ 𝑋 ∃𝑟 ∈ 𝑌 𝑆 ≤ (𝑞 ∨ 𝑟)))) | 
| 63 |  | pm4.72 951 | . . 3
⊢ (((𝑆 ∈ 𝑋 ∨ 𝑆 ∈ 𝑌) → (𝑆 ∈ 𝐴 ∧ ∃𝑞 ∈ 𝑋 ∃𝑟 ∈ 𝑌 𝑆 ≤ (𝑞 ∨ 𝑟))) ↔ ((𝑆 ∈ 𝐴 ∧ ∃𝑞 ∈ 𝑋 ∃𝑟 ∈ 𝑌 𝑆 ≤ (𝑞 ∨ 𝑟)) ↔ ((𝑆 ∈ 𝑋 ∨ 𝑆 ∈ 𝑌) ∨ (𝑆 ∈ 𝐴 ∧ ∃𝑞 ∈ 𝑋 ∃𝑟 ∈ 𝑌 𝑆 ≤ (𝑞 ∨ 𝑟))))) | 
| 64 | 62, 63 | sylib 218 | . 2
⊢ (((𝐾 ∈ Lat ∧ 𝑋 ⊆ 𝐴 ∧ 𝑌 ⊆ 𝐴) ∧ (𝑋 ≠ ∅ ∧ 𝑌 ≠ ∅)) → ((𝑆 ∈ 𝐴 ∧ ∃𝑞 ∈ 𝑋 ∃𝑟 ∈ 𝑌 𝑆 ≤ (𝑞 ∨ 𝑟)) ↔ ((𝑆 ∈ 𝑋 ∨ 𝑆 ∈ 𝑌) ∨ (𝑆 ∈ 𝐴 ∧ ∃𝑞 ∈ 𝑋 ∃𝑟 ∈ 𝑌 𝑆 ≤ (𝑞 ∨ 𝑟))))) | 
| 65 | 6, 64 | bitr4d 282 | 1
⊢ (((𝐾 ∈ Lat ∧ 𝑋 ⊆ 𝐴 ∧ 𝑌 ⊆ 𝐴) ∧ (𝑋 ≠ ∅ ∧ 𝑌 ≠ ∅)) → (𝑆 ∈ (𝑋 + 𝑌) ↔ (𝑆 ∈ 𝐴 ∧ ∃𝑞 ∈ 𝑋 ∃𝑟 ∈ 𝑌 𝑆 ≤ (𝑞 ∨ 𝑟)))) |