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