Metamath Proof Explorer


Theorem pmod2iN

Description: Dual of the modular law. (Contributed by NM, 8-Apr-2012) (New usage is discouraged.)

Ref Expression
Hypotheses pmod.a ⊢ A = Atoms ⁡ K
pmod.s ⊢ S = PSubSp ⁡ K
pmod.p ⊢ + ˙ = + 𝑃 ⁡ K
Assertion pmod2iN ⊢ K ∈ HL ∧ X ∈ S ∧ Y ⊆ A ∧ Z ⊆ A → Z ⊆ X → X ∩ Y + ˙ Z = X ∩ Y + ˙ Z

Proof

Step Hyp Ref Expression
1 pmod.a ⊢ A = Atoms ⁡ K
2 pmod.s ⊢ S = PSubSp ⁡ K
3 pmod.p ⊢ + ˙ = + 𝑃 ⁡ K
4 incom ⊢ X ∩ Y = Y ∩ X
5 4 oveq1i ⊢ X ∩ Y + ˙ Z = Y ∩ X + ˙ Z
6 hllat ⊢ K ∈ HL → K ∈ Lat
7 6 3ad2ant1 ⊢ K ∈ HL ∧ X ∈ S ∧ Y ⊆ A ∧ Z ⊆ A ∧ Z ⊆ X → K ∈ Lat
8 simp22 ⊢ K ∈ HL ∧ X ∈ S ∧ Y ⊆ A ∧ Z ⊆ A ∧ Z ⊆ X → Y ⊆ A
9 ssinss1 ⊢ Y ⊆ A → Y ∩ X ⊆ A
10 8 9 syl ⊢ K ∈ HL ∧ X ∈ S ∧ Y ⊆ A ∧ Z ⊆ A ∧ Z ⊆ X → Y ∩ X ⊆ A
11 simp23 ⊢ K ∈ HL ∧ X ∈ S ∧ Y ⊆ A ∧ Z ⊆ A ∧ Z ⊆ X → Z ⊆ A
12 1 3 paddcom ⊢ K ∈ Lat ∧ Y ∩ X ⊆ A ∧ Z ⊆ A → Y ∩ X + ˙ Z = Z + ˙ Y ∩ X
13 7 10 11 12 syl3anc ⊢ K ∈ HL ∧ X ∈ S ∧ Y ⊆ A ∧ Z ⊆ A ∧ Z ⊆ X → Y ∩ X + ˙ Z = Z + ˙ Y ∩ X
14 5 13 eqtrid ⊢ K ∈ HL ∧ X ∈ S ∧ Y ⊆ A ∧ Z ⊆ A ∧ Z ⊆ X → X ∩ Y + ˙ Z = Z + ˙ Y ∩ X
15 simp21 ⊢ K ∈ HL ∧ X ∈ S ∧ Y ⊆ A ∧ Z ⊆ A ∧ Z ⊆ X → X ∈ S
16 11 8 15 3jca ⊢ K ∈ HL ∧ X ∈ S ∧ Y ⊆ A ∧ Z ⊆ A ∧ Z ⊆ X → Z ⊆ A ∧ Y ⊆ A ∧ X ∈ S
17 1 2 3 pmod1i ⊢ K ∈ HL ∧ Z ⊆ A ∧ Y ⊆ A ∧ X ∈ S → Z ⊆ X → Z + ˙ Y ∩ X = Z + ˙ Y ∩ X
18 17 3impia ⊢ K ∈ HL ∧ Z ⊆ A ∧ Y ⊆ A ∧ X ∈ S ∧ Z ⊆ X → Z + ˙ Y ∩ X = Z + ˙ Y ∩ X
19 16 18 syld3an2 ⊢ K ∈ HL ∧ X ∈ S ∧ Y ⊆ A ∧ Z ⊆ A ∧ Z ⊆ X → Z + ˙ Y ∩ X = Z + ˙ Y ∩ X
20 1 3 paddcom ⊢ K ∈ Lat ∧ Z ⊆ A ∧ Y ⊆ A → Z + ˙ Y = Y + ˙ Z
21 7 11 8 20 syl3anc ⊢ K ∈ HL ∧ X ∈ S ∧ Y ⊆ A ∧ Z ⊆ A ∧ Z ⊆ X → Z + ˙ Y = Y + ˙ Z
22 21 ineq1d ⊢ K ∈ HL ∧ X ∈ S ∧ Y ⊆ A ∧ Z ⊆ A ∧ Z ⊆ X → Z + ˙ Y ∩ X = Y + ˙ Z ∩ X
23 14 19 22 3eqtr2d ⊢ K ∈ HL ∧ X ∈ S ∧ Y ⊆ A ∧ Z ⊆ A ∧ Z ⊆ X → X ∩ Y + ˙ Z = Y + ˙ Z ∩ X
24 incom ⊢ Y + ˙ Z ∩ X = X ∩ Y + ˙ Z
25 23 24 eqtrdi ⊢ K ∈ HL ∧ X ∈ S ∧ Y ⊆ A ∧ Z ⊆ A ∧ Z ⊆ X → X ∩ Y + ˙ Z = X ∩ Y + ˙ Z
26 25 3expia ⊢ K ∈ HL ∧ X ∈ S ∧ Y ⊆ A ∧ Z ⊆ A → Z ⊆ X → X ∩ Y + ˙ Z = X ∩ Y + ˙ Z