Metamath Proof Explorer


Theorem tfsconcatb0

Description: The concatentation with the empty series leaves the series unchanged. (Contributed by RP, 25-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 tfsconcatb0 ⊢ A Fn C ∧ B Fn D ∧ C ∈ On ∧ D ∈ On → B = ∅ ↔ A + ˙ B = A

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 fnrel ⊢ B Fn D → Rel ⁡ B
3 reldm0 ⊢ Rel ⁡ B → B = ∅ ↔ dom ⁡ B = ∅
4 2 3 syl ⊢ B Fn D → B = ∅ ↔ dom ⁡ B = ∅
5 fndm ⊢ B Fn D → dom ⁡ B = D
6 5 eqeq1d ⊢ B Fn D → dom ⁡ B = ∅ ↔ D = ∅
7 4 6 bitrd ⊢ B Fn D → B = ∅ ↔ D = ∅
8 7 ad2antlr ⊢ A Fn C ∧ B Fn D ∧ C ∈ On ∧ D ∈ On → B = ∅ ↔ D = ∅
9 rex0 ⊢ ¬ ∃ z ∈ ∅ x = C + 𝑜 z ∧ y = B ⁡ z
10 rexeq ⊢ D = ∅ → ∃ z ∈ D x = C + 𝑜 z ∧ y = B ⁡ z ↔ ∃ z ∈ ∅ x = C + 𝑜 z ∧ y = B ⁡ z
11 10 adantl ⊢ A Fn C ∧ B Fn D ∧ C ∈ On ∧ D ∈ On ∧ D = ∅ → ∃ z ∈ D x = C + 𝑜 z ∧ y = B ⁡ z ↔ ∃ z ∈ ∅ x = C + 𝑜 z ∧ y = B ⁡ z
12 9 11 mtbiri ⊢ A Fn C ∧ B Fn D ∧ C ∈ On ∧ D ∈ On ∧ D = ∅ → ¬ ∃ z ∈ D x = C + 𝑜 z ∧ y = B ⁡ z
13 12 intnand ⊢ A Fn C ∧ B Fn D ∧ C ∈ On ∧ D ∈ On ∧ D = ∅ → ¬ x ∈ C + 𝑜 D ∖ C ∧ ∃ z ∈ D x = C + 𝑜 z ∧ y = B ⁡ z
14 13 alrimivv ⊢ A Fn C ∧ B Fn D ∧ C ∈ On ∧ D ∈ On ∧ D = ∅ → ∀ x ∀ y ¬ x ∈ C + 𝑜 D ∖ C ∧ ∃ z ∈ D x = C + 𝑜 z ∧ y = B ⁡ z
15 opab0 ⊢ x y | x ∈ C + 𝑜 D ∖ C ∧ ∃ z ∈ D x = C + 𝑜 z ∧ y = B ⁡ z = ∅ ↔ ∀ x ∀ y ¬ x ∈ C + 𝑜 D ∖ C ∧ ∃ z ∈ D x = C + 𝑜 z ∧ y = B ⁡ z
16 14 15 sylibr ⊢ A Fn C ∧ B Fn D ∧ C ∈ On ∧ D ∈ On ∧ D = ∅ → x y | x ∈ C + 𝑜 D ∖ C ∧ ∃ z ∈ D x = C + 𝑜 z ∧ y = B ⁡ z = ∅
17 0ss ⊢ ∅ ⊆ A
18 16 17 eqsstrdi ⊢ A Fn C ∧ B Fn D ∧ C ∈ On ∧ D ∈ On ∧ D = ∅ → x y | x ∈ C + 𝑜 D ∖ C ∧ ∃ z ∈ D x = C + 𝑜 z ∧ y = B ⁡ z ⊆ A
19 18 ex ⊢ A Fn C ∧ B Fn D ∧ C ∈ On ∧ D ∈ On → D = ∅ → x y | x ∈ C + 𝑜 D ∖ C ∧ ∃ z ∈ D x = C + 𝑜 z ∧ y = B ⁡ z ⊆ A
20 df-1o ⊢ 1 𝑜 = suc ⁡ ∅
21 simpl ⊢ D ∈ On ∧ ¬ D = ∅ → D ∈ On
22 on0eln0 ⊢ D ∈ On → ∅ ∈ D ↔ D ≠ ∅
23 df-ne ⊢ D ≠ ∅ ↔ ¬ D = ∅
24 22 23 bitrdi ⊢ D ∈ On → ∅ ∈ D ↔ ¬ D = ∅
25 24 biimpar ⊢ D ∈ On ∧ ¬ D = ∅ → ∅ ∈ D
26 onsucss ⊢ D ∈ On → ∅ ∈ D → suc ⁡ ∅ ⊆ D
27 21 25 26 sylc ⊢ D ∈ On ∧ ¬ D = ∅ → suc ⁡ ∅ ⊆ D
28 20 27 eqsstrid ⊢ D ∈ On ∧ ¬ D = ∅ → 1 𝑜 ⊆ D
29 28 ex ⊢ D ∈ On → ¬ D = ∅ → 1 𝑜 ⊆ D
30 29 adantl ⊢ C ∈ On ∧ D ∈ On → ¬ D = ∅ → 1 𝑜 ⊆ D
31 30 adantl ⊢ A Fn C ∧ B Fn D ∧ C ∈ On ∧ D ∈ On → ¬ D = ∅ → 1 𝑜 ⊆ D
32 simpr ⊢ A Fn C ∧ B Fn D ∧ C ∈ On ∧ D ∈ On ∧ 1 𝑜 ⊆ D → 1 𝑜 ⊆ D
33 0lt1o ⊢ ∅ ∈ 1 𝑜
34 33 a1i ⊢ A Fn C ∧ B Fn D ∧ C ∈ On ∧ D ∈ On ∧ 1 𝑜 ⊆ D → ∅ ∈ 1 𝑜
35 32 34 sseldd ⊢ A Fn C ∧ B Fn D ∧ C ∈ On ∧ D ∈ On ∧ 1 𝑜 ⊆ D → ∅ ∈ D
36 oaord1 ⊢ C ∈ On ∧ D ∈ On → ∅ ∈ D ↔ C ∈ C + 𝑜 D
37 36 ad2antlr ⊢ A Fn C ∧ B Fn D ∧ C ∈ On ∧ D ∈ On ∧ 1 𝑜 ⊆ D → ∅ ∈ D ↔ C ∈ C + 𝑜 D
38 35 37 mpbid ⊢ A Fn C ∧ B Fn D ∧ C ∈ On ∧ D ∈ On ∧ 1 𝑜 ⊆ D → C ∈ C + 𝑜 D
39 ssidd ⊢ A Fn C ∧ B Fn D ∧ C ∈ On ∧ D ∈ On ∧ 1 𝑜 ⊆ D → C ⊆ C
40 oacl ⊢ C ∈ On ∧ D ∈ On → C + 𝑜 D ∈ On
41 eloni ⊢ C + 𝑜 D ∈ On → Ord ⁡ C + 𝑜 D
42 40 41 syl ⊢ C ∈ On ∧ D ∈ On → Ord ⁡ C + 𝑜 D
43 eloni ⊢ C ∈ On → Ord ⁡ C
44 43 adantr ⊢ C ∈ On ∧ D ∈ On → Ord ⁡ C
45 42 44 jca ⊢ C ∈ On ∧ D ∈ On → Ord ⁡ C + 𝑜 D ∧ Ord ⁡ C
46 45 ad2antlr ⊢ A Fn C ∧ B Fn D ∧ C ∈ On ∧ D ∈ On ∧ 1 𝑜 ⊆ D → Ord ⁡ C + 𝑜 D ∧ Ord ⁡ C
47 ordeldif ⊢ Ord ⁡ C + 𝑜 D ∧ Ord ⁡ C → C ∈ C + 𝑜 D ∖ C ↔ C ∈ C + 𝑜 D ∧ C ⊆ C
48 46 47 syl ⊢ A Fn C ∧ B Fn D ∧ C ∈ On ∧ D ∈ On ∧ 1 𝑜 ⊆ D → C ∈ C + 𝑜 D ∖ C ↔ C ∈ C + 𝑜 D ∧ C ⊆ C
49 38 39 48 mpbir2and ⊢ A Fn C ∧ B Fn D ∧ C ∈ On ∧ D ∈ On ∧ 1 𝑜 ⊆ D → C ∈ C + 𝑜 D ∖ C
50 simpl ⊢ C ∈ On ∧ D ∈ On → C ∈ On
51 50 ad2antlr ⊢ A Fn C ∧ B Fn D ∧ C ∈ On ∧ D ∈ On ∧ 1 𝑜 ⊆ D → C ∈ On
52 oa0 ⊢ C ∈ On → C + 𝑜 ∅ = C
53 51 52 syl ⊢ A Fn C ∧ B Fn D ∧ C ∈ On ∧ D ∈ On ∧ 1 𝑜 ⊆ D → C + 𝑜 ∅ = C
54 53 eqcomd ⊢ A Fn C ∧ B Fn D ∧ C ∈ On ∧ D ∈ On ∧ 1 𝑜 ⊆ D → C = C + 𝑜 ∅
55 eqidd ⊢ A Fn C ∧ B Fn D ∧ C ∈ On ∧ D ∈ On ∧ 1 𝑜 ⊆ D → B ⁡ ∅ = B ⁡ ∅
56 54 55 jca ⊢ A Fn C ∧ B Fn D ∧ C ∈ On ∧ D ∈ On ∧ 1 𝑜 ⊆ D → C = C + 𝑜 ∅ ∧ B ⁡ ∅ = B ⁡ ∅
57 oveq2 ⊢ z = ∅ → C + 𝑜 z = C + 𝑜 ∅
58 57 eqeq2d ⊢ z = ∅ → C = C + 𝑜 z ↔ C = C + 𝑜 ∅
59 fveq2 ⊢ z = ∅ → B ⁡ z = B ⁡ ∅
60 59 eqeq2d ⊢ z = ∅ → B ⁡ ∅ = B ⁡ z ↔ B ⁡ ∅ = B ⁡ ∅
61 58 60 anbi12d ⊢ z = ∅ → C = C + 𝑜 z ∧ B ⁡ ∅ = B ⁡ z ↔ C = C + 𝑜 ∅ ∧ B ⁡ ∅ = B ⁡ ∅
62 61 rspcev ⊢ ∅ ∈ D ∧ C = C + 𝑜 ∅ ∧ B ⁡ ∅ = B ⁡ ∅ → ∃ z ∈ D C = C + 𝑜 z ∧ B ⁡ ∅ = B ⁡ z
63 35 56 62 syl2anc ⊢ A Fn C ∧ B Fn D ∧ C ∈ On ∧ D ∈ On ∧ 1 𝑜 ⊆ D → ∃ z ∈ D C = C + 𝑜 z ∧ B ⁡ ∅ = B ⁡ z
64 fvexd ⊢ A Fn C ∧ B Fn D ∧ C ∈ On ∧ D ∈ On ∧ 1 𝑜 ⊆ D → B ⁡ ∅ ∈ V
65 eleq1 ⊢ x = C → x ∈ C + 𝑜 D ∖ C ↔ C ∈ C + 𝑜 D ∖ C
66 65 adantr ⊢ x = C ∧ y = B ⁡ ∅ → x ∈ C + 𝑜 D ∖ C ↔ C ∈ C + 𝑜 D ∖ C
67 eqeq1 ⊢ x = C → x = C + 𝑜 z ↔ C = C + 𝑜 z
68 eqeq1 ⊢ y = B ⁡ ∅ → y = B ⁡ z ↔ B ⁡ ∅ = B ⁡ z
69 67 68 bi2anan9 ⊢ x = C ∧ y = B ⁡ ∅ → x = C + 𝑜 z ∧ y = B ⁡ z ↔ C = C + 𝑜 z ∧ B ⁡ ∅ = B ⁡ z
70 69 rexbidv ⊢ x = C ∧ y = B ⁡ ∅ → ∃ z ∈ D x = C + 𝑜 z ∧ y = B ⁡ z ↔ ∃ z ∈ D C = C + 𝑜 z ∧ B ⁡ ∅ = B ⁡ z
71 66 70 anbi12d ⊢ x = C ∧ y = B ⁡ ∅ → x ∈ C + 𝑜 D ∖ C ∧ ∃ z ∈ D x = C + 𝑜 z ∧ y = B ⁡ z ↔ C ∈ C + 𝑜 D ∖ C ∧ ∃ z ∈ D C = C + 𝑜 z ∧ B ⁡ ∅ = B ⁡ z
72 71 opelopabga ⊢ C ∈ On ∧ B ⁡ ∅ ∈ V → C B ⁡ ∅ ∈ x y | x ∈ C + 𝑜 D ∖ C ∧ ∃ z ∈ D x = C + 𝑜 z ∧ y = B ⁡ z ↔ C ∈ C + 𝑜 D ∖ C ∧ ∃ z ∈ D C = C + 𝑜 z ∧ B ⁡ ∅ = B ⁡ z
73 51 64 72 syl2anc ⊢ A Fn C ∧ B Fn D ∧ C ∈ On ∧ D ∈ On ∧ 1 𝑜 ⊆ D → C B ⁡ ∅ ∈ x y | x ∈ C + 𝑜 D ∖ C ∧ ∃ z ∈ D x = C + 𝑜 z ∧ y = B ⁡ z ↔ C ∈ C + 𝑜 D ∖ C ∧ ∃ z ∈ D C = C + 𝑜 z ∧ B ⁡ ∅ = B ⁡ z
74 49 63 73 mpbir2and ⊢ A Fn C ∧ B Fn D ∧ C ∈ On ∧ D ∈ On ∧ 1 𝑜 ⊆ D → C B ⁡ ∅ ∈ x y | x ∈ C + 𝑜 D ∖ C ∧ ∃ z ∈ D x = C + 𝑜 z ∧ y = B ⁡ z
75 74 ex ⊢ A Fn C ∧ B Fn D ∧ C ∈ On ∧ D ∈ On → 1 𝑜 ⊆ D → C B ⁡ ∅ ∈ x y | x ∈ C + 𝑜 D ∖ C ∧ ∃ z ∈ D x = C + 𝑜 z ∧ y = B ⁡ z
76 ordirr ⊢ Ord ⁡ C → ¬ C ∈ C
77 43 76 syl ⊢ C ∈ On → ¬ C ∈ C
78 77 adantr ⊢ C ∈ On ∧ D ∈ On → ¬ C ∈ C
79 78 adantl ⊢ A Fn C ∧ B Fn D ∧ C ∈ On ∧ D ∈ On → ¬ C ∈ C
80 fndm ⊢ A Fn C → dom ⁡ A = C
81 80 adantr ⊢ A Fn C ∧ B Fn D → dom ⁡ A = C
82 81 adantr ⊢ A Fn C ∧ B Fn D ∧ C ∈ On ∧ D ∈ On → dom ⁡ A = C
83 79 82 neleqtrrd ⊢ A Fn C ∧ B Fn D ∧ C ∈ On ∧ D ∈ On → ¬ C ∈ dom ⁡ A
84 50 adantl ⊢ A Fn C ∧ B Fn D ∧ C ∈ On ∧ D ∈ On → C ∈ On
85 fvexd ⊢ A Fn C ∧ B Fn D ∧ C ∈ On ∧ D ∈ On → B ⁡ ∅ ∈ V
86 84 85 opeldmd ⊢ A Fn C ∧ B Fn D ∧ C ∈ On ∧ D ∈ On → C B ⁡ ∅ ∈ A → C ∈ dom ⁡ A
87 83 86 mtod ⊢ A Fn C ∧ B Fn D ∧ C ∈ On ∧ D ∈ On → ¬ C B ⁡ ∅ ∈ A
88 75 87 jctird ⊢ A Fn C ∧ B Fn D ∧ C ∈ On ∧ D ∈ On → 1 𝑜 ⊆ D → C B ⁡ ∅ ∈ x y | x ∈ C + 𝑜 D ∖ C ∧ ∃ z ∈ D x = C + 𝑜 z ∧ y = B ⁡ z ∧ ¬ C B ⁡ ∅ ∈ A
89 nelss ⊢ C B ⁡ ∅ ∈ x y | x ∈ C + 𝑜 D ∖ C ∧ ∃ z ∈ D x = C + 𝑜 z ∧ y = B ⁡ z ∧ ¬ C B ⁡ ∅ ∈ A → ¬ x y | x ∈ C + 𝑜 D ∖ C ∧ ∃ z ∈ D x = C + 𝑜 z ∧ y = B ⁡ z ⊆ A
90 88 89 syl6 ⊢ A Fn C ∧ B Fn D ∧ C ∈ On ∧ D ∈ On → 1 𝑜 ⊆ D → ¬ x y | x ∈ C + 𝑜 D ∖ C ∧ ∃ z ∈ D x = C + 𝑜 z ∧ y = B ⁡ z ⊆ A
91 31 90 syld ⊢ A Fn C ∧ B Fn D ∧ C ∈ On ∧ D ∈ On → ¬ D = ∅ → ¬ x y | x ∈ C + 𝑜 D ∖ C ∧ ∃ z ∈ D x = C + 𝑜 z ∧ y = B ⁡ z ⊆ A
92 19 91 impcon4bid ⊢ A Fn C ∧ B Fn D ∧ C ∈ On ∧ D ∈ On → D = ∅ ↔ x y | x ∈ C + 𝑜 D ∖ C ∧ ∃ z ∈ D x = C + 𝑜 z ∧ y = B ⁡ z ⊆ A
93 8 92 bitrd ⊢ A Fn C ∧ B Fn D ∧ C ∈ On ∧ D ∈ On → B = ∅ ↔ x y | x ∈ C + 𝑜 D ∖ C ∧ ∃ z ∈ D x = C + 𝑜 z ∧ y = B ⁡ z ⊆ A
94 ssequn2 ⊢ x y | x ∈ C + 𝑜 D ∖ C ∧ ∃ z ∈ D x = C + 𝑜 z ∧ y = B ⁡ z ⊆ A ↔ A ∪ x y | x ∈ C + 𝑜 D ∖ C ∧ ∃ z ∈ D x = C + 𝑜 z ∧ y = B ⁡ z = A
95 93 94 bitrdi ⊢ A Fn C ∧ B Fn D ∧ C ∈ On ∧ D ∈ On → B = ∅ ↔ A ∪ x y | x ∈ C + 𝑜 D ∖ C ∧ ∃ z ∈ D x = C + 𝑜 z ∧ y = B ⁡ z = A
96 1 tfsconcatun ⊢ A Fn C ∧ B Fn D ∧ C ∈ On ∧ D ∈ On → A + ˙ B = A ∪ x y | x ∈ C + 𝑜 D ∖ C ∧ ∃ z ∈ D x = C + 𝑜 z ∧ y = B ⁡ z
97 96 eqeq1d ⊢ A Fn C ∧ B Fn D ∧ C ∈ On ∧ D ∈ On → A + ˙ B = A ↔ A ∪ x y | x ∈ C + 𝑜 D ∖ C ∧ ∃ z ∈ D x = C + 𝑜 z ∧ y = B ⁡ z = A
98 95 97 bitr4d ⊢ A Fn C ∧ B Fn D ∧ C ∈ On ∧ D ∈ On → B = ∅ ↔ A + ˙ B = A