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