Metamath Proof Explorer


Theorem tfsconcatfv

Description: The value of the concatenation of two transfinite series. (Contributed by RP, 24-Feb-2025)

Ref Expression
Hypothesis tfsconcat.op + ˙ = a V , b V a x y | x dom a + 𝑜 dom b dom a z dom b x = dom a + 𝑜 z y = b z
Assertion tfsconcatfv A Fn C B Fn D C On D On X C + 𝑜 D A + ˙ B X = if X C A X B ι d D | C + 𝑜 d = X

Proof

Step Hyp Ref Expression
1 tfsconcat.op + ˙ = a V , b V a x y | x dom a + 𝑜 dom b dom a z dom b x = dom a + 𝑜 z y = b z
2 1 tfsconcatfv1 A Fn C B Fn D C On D On X C A + ˙ B X = A X
3 2 adantlr A Fn C B Fn D C On D On X C + 𝑜 D X C A + ˙ B X = A X
4 simpr A Fn C B Fn D C On D On X C + 𝑜 D X C X C
5 4 iftrued A Fn C B Fn D C On D On X C + 𝑜 D X C if X C A X B ι d D | C + 𝑜 d = X = A X
6 3 5 eqtr4d A Fn C B Fn D C On D On X C + 𝑜 D X C A + ˙ B X = if X C A X B ι d D | C + 𝑜 d = X
7 simpr A Fn C B Fn D C On D On X C + 𝑜 D ¬ X C ¬ X C
8 7 iffalsed A Fn C B Fn D C On D On X C + 𝑜 D ¬ X C if X C A X B ι d D | C + 𝑜 d = X = B ι d D | C + 𝑜 d = X
9 simpll A Fn C B Fn D C On D On X C + 𝑜 D ¬ X C A Fn C B Fn D C On D On
10 onss D On D On
11 10 adantl C On D On D On
12 11 ad3antlr A Fn C B Fn D C On D On X C + 𝑜 D ¬ X C D On
13 simpllr A Fn C B Fn D C On D On X C + 𝑜 D ¬ X C C On D On
14 simplrl A Fn C B Fn D C On D On X C + 𝑜 D C On
15 oacl C On D On C + 𝑜 D On
16 15 adantl A Fn C B Fn D C On D On C + 𝑜 D On
17 onelon C + 𝑜 D On X C + 𝑜 D X On
18 16 17 sylan A Fn C B Fn D C On D On X C + 𝑜 D X On
19 ontri1 C On X On C X ¬ X C
20 14 18 19 syl2anc A Fn C B Fn D C On D On X C + 𝑜 D C X ¬ X C
21 20 biimpar A Fn C B Fn D C On D On X C + 𝑜 D ¬ X C C X
22 simplr A Fn C B Fn D C On D On X C + 𝑜 D ¬ X C X C + 𝑜 D
23 oawordex2 C On D On C X X C + 𝑜 D d D C + 𝑜 d = X
24 13 21 22 23 syl12anc A Fn C B Fn D C On D On X C + 𝑜 D ¬ X C d D C + 𝑜 d = X
25 14 18 jca A Fn C B Fn D C On D On X C + 𝑜 D C On X On
26 oawordeu C On X On C X ∃! d On C + 𝑜 d = X
27 25 21 26 syl2an2r A Fn C B Fn D C On D On X C + 𝑜 D ¬ X C ∃! d On C + 𝑜 d = X
28 reuss D On d D C + 𝑜 d = X ∃! d On C + 𝑜 d = X ∃! d D C + 𝑜 d = X
29 12 24 27 28 syl3anc A Fn C B Fn D C On D On X C + 𝑜 D ¬ X C ∃! d D C + 𝑜 d = X
30 riotacl ∃! d D C + 𝑜 d = X ι d D | C + 𝑜 d = X D
31 29 30 syl A Fn C B Fn D C On D On X C + 𝑜 D ¬ X C ι d D | C + 𝑜 d = X D
32 1 tfsconcatfv2 A Fn C B Fn D C On D On ι d D | C + 𝑜 d = X D A + ˙ B C + 𝑜 ι d D | C + 𝑜 d = X = B ι d D | C + 𝑜 d = X
33 9 31 32 syl2anc A Fn C B Fn D C On D On X C + 𝑜 D ¬ X C A + ˙ B C + 𝑜 ι d D | C + 𝑜 d = X = B ι d D | C + 𝑜 d = X
34 riotasbc ∃! d D C + 𝑜 d = X [˙ ι d D | C + 𝑜 d = X / d]˙ C + 𝑜 d = X
35 29 34 syl A Fn C B Fn D C On D On X C + 𝑜 D ¬ X C [˙ ι d D | C + 𝑜 d = X / d]˙ C + 𝑜 d = X
36 sbceq1g ι d D | C + 𝑜 d = X D [˙ ι d D | C + 𝑜 d = X / d]˙ C + 𝑜 d = X ι d D | C + 𝑜 d = X / d C + 𝑜 d = X
37 csbov2g ι d D | C + 𝑜 d = X D ι d D | C + 𝑜 d = X / d C + 𝑜 d = C + 𝑜 ι d D | C + 𝑜 d = X / d d
38 csbvarg ι d D | C + 𝑜 d = X D ι d D | C + 𝑜 d = X / d d = ι d D | C + 𝑜 d = X
39 38 oveq2d ι d D | C + 𝑜 d = X D C + 𝑜 ι d D | C + 𝑜 d = X / d d = C + 𝑜 ι d D | C + 𝑜 d = X
40 37 39 eqtrd ι d D | C + 𝑜 d = X D ι d D | C + 𝑜 d = X / d C + 𝑜 d = C + 𝑜 ι d D | C + 𝑜 d = X
41 40 eqeq1d ι d D | C + 𝑜 d = X D ι d D | C + 𝑜 d = X / d C + 𝑜 d = X C + 𝑜 ι d D | C + 𝑜 d = X = X
42 36 41 bitrd ι d D | C + 𝑜 d = X D [˙ ι d D | C + 𝑜 d = X / d]˙ C + 𝑜 d = X C + 𝑜 ι d D | C + 𝑜 d = X = X
43 42 biimpa ι d D | C + 𝑜 d = X D [˙ ι d D | C + 𝑜 d = X / d]˙ C + 𝑜 d = X C + 𝑜 ι d D | C + 𝑜 d = X = X
44 31 35 43 syl2anc A Fn C B Fn D C On D On X C + 𝑜 D ¬ X C C + 𝑜 ι d D | C + 𝑜 d = X = X
45 44 fveq2d A Fn C B Fn D C On D On X C + 𝑜 D ¬ X C A + ˙ B C + 𝑜 ι d D | C + 𝑜 d = X = A + ˙ B X
46 8 33 45 3eqtr2rd A Fn C B Fn D C On D On X C + 𝑜 D ¬ X C A + ˙ B X = if X C A X B ι d D | C + 𝑜 d = X
47 6 46 pm2.61dan A Fn C B Fn D C On D On X C + 𝑜 D A + ˙ B X = if X C A X B ι d D | C + 𝑜 d = X