Metamath Proof Explorer


Theorem ackbij1lem9

Description: Lemma for ackbij1 . (Contributed by Stefan O'Rear, 19-Nov-2014)

Ref Expression
Hypothesis ackbij.f F=x𝒫ωFincardyxy×𝒫y
Assertion ackbij1lem9 A𝒫ωFinB𝒫ωFinAB=FAB=FA+𝑜FB

Proof

Step Hyp Ref Expression
1 ackbij.f F=x𝒫ωFincardyxy×𝒫y
2 elinel2 A𝒫ωFinAFin
3 2 3ad2ant1 A𝒫ωFinB𝒫ωFinAB=AFin
4 snfi yFin
5 elinel1 A𝒫ωFinA𝒫ω
6 5 elpwid A𝒫ωFinAω
7 6 3ad2ant1 A𝒫ωFinB𝒫ωFinAB=Aω
8 onfin2 ω=OnFin
9 inss2 OnFinFin
10 8 9 eqsstri ωFin
11 7 10 sstrdi A𝒫ωFinB𝒫ωFinAB=AFin
12 11 sselda A𝒫ωFinB𝒫ωFinAB=yAyFin
13 pwfi yFin𝒫yFin
14 12 13 sylib A𝒫ωFinB𝒫ωFinAB=yA𝒫yFin
15 xpfi yFin𝒫yFiny×𝒫yFin
16 4 14 15 sylancr A𝒫ωFinB𝒫ωFinAB=yAy×𝒫yFin
17 16 ralrimiva A𝒫ωFinB𝒫ωFinAB=yAy×𝒫yFin
18 iunfi AFinyAy×𝒫yFinyAy×𝒫yFin
19 3 17 18 syl2anc A𝒫ωFinB𝒫ωFinAB=yAy×𝒫yFin
20 ficardid yAy×𝒫yFincardyAy×𝒫yyAy×𝒫y
21 19 20 syl A𝒫ωFinB𝒫ωFinAB=cardyAy×𝒫yyAy×𝒫y
22 elinel2 B𝒫ωFinBFin
23 22 3ad2ant2 A𝒫ωFinB𝒫ωFinAB=BFin
24 elinel1 B𝒫ωFinB𝒫ω
25 24 elpwid B𝒫ωFinBω
26 25 3ad2ant2 A𝒫ωFinB𝒫ωFinAB=Bω
27 26 10 sstrdi A𝒫ωFinB𝒫ωFinAB=BFin
28 27 sselda A𝒫ωFinB𝒫ωFinAB=yByFin
29 28 13 sylib A𝒫ωFinB𝒫ωFinAB=yB𝒫yFin
30 4 29 15 sylancr A𝒫ωFinB𝒫ωFinAB=yBy×𝒫yFin
31 30 ralrimiva A𝒫ωFinB𝒫ωFinAB=yBy×𝒫yFin
32 iunfi BFinyBy×𝒫yFinyBy×𝒫yFin
33 23 31 32 syl2anc A𝒫ωFinB𝒫ωFinAB=yBy×𝒫yFin
34 ficardid yBy×𝒫yFincardyBy×𝒫yyBy×𝒫y
35 33 34 syl A𝒫ωFinB𝒫ωFinAB=cardyBy×𝒫yyBy×𝒫y
36 djuen cardyAy×𝒫yyAy×𝒫ycardyBy×𝒫yyBy×𝒫ycardyAy×𝒫y⊔︀cardyBy×𝒫yyAy×𝒫y⊔︀yBy×𝒫y
37 21 35 36 syl2anc A𝒫ωFinB𝒫ωFinAB=cardyAy×𝒫y⊔︀cardyBy×𝒫yyAy×𝒫y⊔︀yBy×𝒫y
38 djudisj AB=yAy×𝒫yyBy×𝒫y=
39 38 3ad2ant3 A𝒫ωFinB𝒫ωFinAB=yAy×𝒫yyBy×𝒫y=
40 endjudisj yAy×𝒫yFinyBy×𝒫yFinyAy×𝒫yyBy×𝒫y=yAy×𝒫y⊔︀yBy×𝒫yyAy×𝒫yyBy×𝒫y
41 19 33 39 40 syl3anc A𝒫ωFinB𝒫ωFinAB=yAy×𝒫y⊔︀yBy×𝒫yyAy×𝒫yyBy×𝒫y
42 iunxun yABy×𝒫y=yAy×𝒫yyBy×𝒫y
43 41 42 breqtrrdi A𝒫ωFinB𝒫ωFinAB=yAy×𝒫y⊔︀yBy×𝒫yyABy×𝒫y
44 entr cardyAy×𝒫y⊔︀cardyBy×𝒫yyAy×𝒫y⊔︀yBy×𝒫yyAy×𝒫y⊔︀yBy×𝒫yyABy×𝒫ycardyAy×𝒫y⊔︀cardyBy×𝒫yyABy×𝒫y
45 37 43 44 syl2anc A𝒫ωFinB𝒫ωFinAB=cardyAy×𝒫y⊔︀cardyBy×𝒫yyABy×𝒫y
46 carden2b cardyAy×𝒫y⊔︀cardyBy×𝒫yyABy×𝒫ycardcardyAy×𝒫y⊔︀cardyBy×𝒫y=cardyABy×𝒫y
47 45 46 syl A𝒫ωFinB𝒫ωFinAB=cardcardyAy×𝒫y⊔︀cardyBy×𝒫y=cardyABy×𝒫y
48 ficardom yAy×𝒫yFincardyAy×𝒫yω
49 19 48 syl A𝒫ωFinB𝒫ωFinAB=cardyAy×𝒫yω
50 ficardom yBy×𝒫yFincardyBy×𝒫yω
51 33 50 syl A𝒫ωFinB𝒫ωFinAB=cardyBy×𝒫yω
52 nnadju cardyAy×𝒫yωcardyBy×𝒫yωcardcardyAy×𝒫y⊔︀cardyBy×𝒫y=cardyAy×𝒫y+𝑜cardyBy×𝒫y
53 49 51 52 syl2anc A𝒫ωFinB𝒫ωFinAB=cardcardyAy×𝒫y⊔︀cardyBy×𝒫y=cardyAy×𝒫y+𝑜cardyBy×𝒫y
54 47 53 eqtr3d A𝒫ωFinB𝒫ωFinAB=cardyABy×𝒫y=cardyAy×𝒫y+𝑜cardyBy×𝒫y
55 ackbij1lem6 A𝒫ωFinB𝒫ωFinAB𝒫ωFin
56 55 3adant3 A𝒫ωFinB𝒫ωFinAB=AB𝒫ωFin
57 1 ackbij1lem7 AB𝒫ωFinFAB=cardyABy×𝒫y
58 56 57 syl A𝒫ωFinB𝒫ωFinAB=FAB=cardyABy×𝒫y
59 1 ackbij1lem7 A𝒫ωFinFA=cardyAy×𝒫y
60 1 ackbij1lem7 B𝒫ωFinFB=cardyBy×𝒫y
61 59 60 oveqan12d A𝒫ωFinB𝒫ωFinFA+𝑜FB=cardyAy×𝒫y+𝑜cardyBy×𝒫y
62 61 3adant3 A𝒫ωFinB𝒫ωFinAB=FA+𝑜FB=cardyAy×𝒫y+𝑜cardyBy×𝒫y
63 54 58 62 3eqtr4d A𝒫ωFinB𝒫ωFinAB=FAB=FA+𝑜FB