Metamath Proof Explorer


Theorem mdsl1i

Description: If the modular pair property holds in a sublattice, it holds in the whole lattice. Lemma 1.4 of MaedaMaeda p. 2. (Contributed by NM, 27-Apr-2006) (New usage is discouraged.)

Ref Expression
Hypotheses mdsl.1 AC
mdsl.2 BC
Assertion mdsl1i xCABxxABxBxAB=xABA𝑀B

Proof

Step Hyp Ref Expression
1 mdsl.1 AC
2 mdsl.2 BC
3 sseq2 x=yABABxAByAB
4 sseq1 x=yABxAByABAB
5 3 4 anbi12d x=yABABxxABAByAByABAB
6 sseq1 x=yABxByABB
7 oveq1 x=yABxA=yABA
8 7 ineq1d x=yABxAB=yABAB
9 oveq1 x=yABxAB=yABAB
10 8 9 eqeq12d x=yABxAB=xAByABAB=yABAB
11 6 10 imbi12d x=yABxBxAB=xAByABByABAB=yABAB
12 5 11 imbi12d x=yABABxxABxBxAB=xABAByAByABAByABByABAB=yABAB
13 12 rspccv xCABxxABxBxAB=xAByABCAByAByABAByABByABAB=yABAB
14 impexp yABCAByAByABAByABByABAB=yABAByABCAByAByABAByABByABAB=yABAB
15 impexp yABCAByAByABAByABByABAB=yABAByABCAByAByABAByABByABAB=yABAB
16 14 15 bitr2i yABCAByAByABAByABByABAB=yABAByABCAByAByABAByABByABAB=yABAB
17 inss2 ABB
18 1 2 chincli ABC
19 chlub yCABCBCyBABByABB
20 18 2 19 mp3an23 yCyBABByABB
21 20 biimpd yCyBABByABB
22 17 21 mpan2i yCyByABB
23 2 1 chub2i BAB
24 sstr yABBBAByABAB
25 23 24 mpan2 yABByABAB
26 22 25 syl6 yCyByABAB
27 chub2 ABCyCAByAB
28 18 27 mpan yCAByAB
29 26 28 jctild yCyBAByAByABAB
30 chjcl yCABCyABC
31 18 30 mpan2 yCyABC
32 29 31 jctild yCyByABCAByAByABAB
33 32 22 jcad yCyByABCAByAByABAByABB
34 chjass yCABCACyABA=yABA
35 18 1 34 mp3an23 yCyABA=yABA
36 18 1 chjcomi ABA=AAB
37 1 2 chabs1i AAB=A
38 36 37 eqtri ABA=A
39 38 oveq2i yABA=yA
40 35 39 eqtrdi yCyABA=yA
41 40 ineq1d yCyABAB=yAB
42 chjass yCABCABCyABAB=yABAB
43 18 18 42 mp3an23 yCyABAB=yABAB
44 18 chjidmi ABAB=AB
45 44 oveq2i yABAB=yAB
46 43 45 eqtrdi yCyABAB=yAB
47 41 46 eqeq12d yCyABAB=yABAByAB=yAB
48 47 biimpd yCyABAB=yABAByAB=yAB
49 33 48 imim12d yCyABCAByAByABAByABByABAB=yABAByByAB=yAB
50 16 49 syl5bi yCyABCAByAByABAByABByABAB=yABAByByAB=yAB
51 13 50 syl5com xCABxxABxBxAB=xAByCyByAB=yAB
52 51 ralrimiv xCABxxABxBxAB=xAByCyByAB=yAB
53 mdbr ACBCA𝑀ByCyByAB=yAB
54 1 2 53 mp2an A𝑀ByCyByAB=yAB
55 52 54 sylibr xCABxxABxBxAB=xABA𝑀B
56 mdbr ACBCA𝑀BxCxBxAB=xAB
57 1 2 56 mp2an A𝑀BxCxBxAB=xAB
58 ax-1 xBxAB=xABABxxABxBxAB=xAB
59 58 ralimi xCxBxAB=xABxCABxxABxBxAB=xAB
60 57 59 sylbi A𝑀BxCABxxABxBxAB=xAB
61 55 60 impbii xCABxxABxBxAB=xABA𝑀B