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