Metamath Proof Explorer


Theorem pmodN

Description: The modular law for projective subspaces. (Contributed by NM, 26-Mar-2012) (New usage is discouraged.)

Ref Expression
Hypotheses pmod.a ⊢ A = Atoms ⁡ K
pmod.s ⊢ S = PSubSp ⁡ K
pmod.p ⊢ + ˙ = + 𝑃 ⁡ K
Assertion pmodN ⊢ K ∈ HL ∧ X ∈ S ∧ Y ⊆ A ∧ Z ⊆ A → X ∩ Y + ˙ X ∩ Z = X ∩ Y + ˙ X ∩ 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 ∩ X ∩ Z + ˙ Y = X ∩ Z + ˙ Y ∩ X
5 hllat ⊢ K ∈ HL → K ∈ Lat
6 5 adantr ⊢ K ∈ HL ∧ X ∈ S ∧ Y ⊆ A ∧ Z ⊆ A → K ∈ Lat
7 simpr2 ⊢ K ∈ HL ∧ X ∈ S ∧ Y ⊆ A ∧ Z ⊆ A → Y ⊆ A
8 inss2 ⊢ X ∩ Z ⊆ Z
9 simpr3 ⊢ K ∈ HL ∧ X ∈ S ∧ Y ⊆ A ∧ Z ⊆ A → Z ⊆ A
10 8 9 sstrid ⊢ K ∈ HL ∧ X ∈ S ∧ Y ⊆ A ∧ Z ⊆ A → X ∩ Z ⊆ A
11 1 3 paddcom ⊢ K ∈ Lat ∧ Y ⊆ A ∧ X ∩ Z ⊆ A → Y + ˙ X ∩ Z = X ∩ Z + ˙ Y
12 6 7 10 11 syl3anc ⊢ K ∈ HL ∧ X ∈ S ∧ Y ⊆ A ∧ Z ⊆ A → Y + ˙ X ∩ Z = X ∩ Z + ˙ Y
13 12 ineq2d ⊢ K ∈ HL ∧ X ∈ S ∧ Y ⊆ A ∧ Z ⊆ A → X ∩ Y + ˙ X ∩ Z = X ∩ X ∩ Z + ˙ Y
14 incom ⊢ X ∩ Y = Y ∩ X
15 14 oveq2i ⊢ X ∩ Z + ˙ X ∩ Y = X ∩ Z + ˙ Y ∩ X
16 inss2 ⊢ X ∩ Y ⊆ Y
17 16 7 sstrid ⊢ K ∈ HL ∧ X ∈ S ∧ Y ⊆ A ∧ Z ⊆ A → X ∩ Y ⊆ A
18 1 3 paddcom ⊢ K ∈ Lat ∧ X ∩ Y ⊆ A ∧ X ∩ Z ⊆ A → X ∩ Y + ˙ X ∩ Z = X ∩ Z + ˙ X ∩ Y
19 6 17 10 18 syl3anc ⊢ K ∈ HL ∧ X ∈ S ∧ Y ⊆ A ∧ Z ⊆ A → X ∩ Y + ˙ X ∩ Z = X ∩ Z + ˙ X ∩ Y
20 simpr1 ⊢ K ∈ HL ∧ X ∈ S ∧ Y ⊆ A ∧ Z ⊆ A → X ∈ S
21 10 7 20 3jca ⊢ K ∈ HL ∧ X ∈ S ∧ Y ⊆ A ∧ Z ⊆ A → X ∩ Z ⊆ A ∧ Y ⊆ A ∧ X ∈ S
22 inss1 ⊢ X ∩ Z ⊆ X
23 1 2 3 pmod1i ⊢ K ∈ HL ∧ X ∩ Z ⊆ A ∧ Y ⊆ A ∧ X ∈ S → X ∩ Z ⊆ X → X ∩ Z + ˙ Y ∩ X = X ∩ Z + ˙ Y ∩ X
24 22 23 mpi ⊢ K ∈ HL ∧ X ∩ Z ⊆ A ∧ Y ⊆ A ∧ X ∈ S → X ∩ Z + ˙ Y ∩ X = X ∩ Z + ˙ Y ∩ X
25 21 24 syldan ⊢ K ∈ HL ∧ X ∈ S ∧ Y ⊆ A ∧ Z ⊆ A → X ∩ Z + ˙ Y ∩ X = X ∩ Z + ˙ Y ∩ X
26 15 19 25 3eqtr4a ⊢ K ∈ HL ∧ X ∈ S ∧ Y ⊆ A ∧ Z ⊆ A → X ∩ Y + ˙ X ∩ Z = X ∩ Z + ˙ Y ∩ X
27 4 13 26 3eqtr4a ⊢ K ∈ HL ∧ X ∈ S ∧ Y ⊆ A ∧ Z ⊆ A → X ∩ Y + ˙ X ∩ Z = X ∩ Y + ˙ X ∩ Z