Metamath Proof Explorer


Theorem tfsconcat0i

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

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 simpr ⊢ A Fn C ∧ B Fn D ∧ C ∈ On ∧ D ∈ On ∧ A = ∅ → A = ∅
3 fnrel ⊢ A Fn C → Rel ⁡ A
4 reldm0 ⊢ Rel ⁡ A → A = ∅ ↔ dom ⁡ A = ∅
5 3 4 syl ⊢ A Fn C → A = ∅ ↔ dom ⁡ A = ∅
6 fndm ⊢ A Fn C → dom ⁡ A = C
7 6 eqeq1d ⊢ A Fn C → dom ⁡ A = ∅ ↔ C = ∅
8 5 7 bitrd ⊢ A Fn C → A = ∅ ↔ C = ∅
9 8 ad2antrr ⊢ A Fn C ∧ B Fn D ∧ C ∈ On ∧ D ∈ On → A = ∅ ↔ C = ∅
10 simpr ⊢ A Fn C ∧ B Fn D → B Fn D
11 simpr ⊢ C ∈ On ∧ D ∈ On → D ∈ On
12 10 11 anim12i ⊢ A Fn C ∧ B Fn D ∧ C ∈ On ∧ D ∈ On → B Fn D ∧ D ∈ On
13 12 anim1i ⊢ A Fn C ∧ B Fn D ∧ C ∈ On ∧ D ∈ On ∧ C = ∅ → B Fn D ∧ D ∈ On ∧ C = ∅
14 9 13 sylbida ⊢ A Fn C ∧ B Fn D ∧ C ∈ On ∧ D ∈ On ∧ A = ∅ → B Fn D ∧ D ∈ On ∧ C = ∅
15 oveq1 ⊢ C = ∅ → C + 𝑜 D = ∅ + 𝑜 D
16 id ⊢ C = ∅ → C = ∅
17 15 16 difeq12d ⊢ C = ∅ → C + 𝑜 D ∖ C = ∅ + 𝑜 D ∖ ∅
18 dif0 ⊢ ∅ + 𝑜 D ∖ ∅ = ∅ + 𝑜 D
19 17 18 eqtrdi ⊢ C = ∅ → C + 𝑜 D ∖ C = ∅ + 𝑜 D
20 19 eleq2d ⊢ C = ∅ → x ∈ C + 𝑜 D ∖ C ↔ x ∈ ∅ + 𝑜 D
21 oveq1 ⊢ C = ∅ → C + 𝑜 z = ∅ + 𝑜 z
22 21 eqeq2d ⊢ C = ∅ → x = C + 𝑜 z ↔ x = ∅ + 𝑜 z
23 22 anbi1d ⊢ C = ∅ → x = C + 𝑜 z ∧ y = B ⁡ z ↔ x = ∅ + 𝑜 z ∧ y = B ⁡ z
24 23 rexbidv ⊢ C = ∅ → ∃ z ∈ D x = C + 𝑜 z ∧ y = B ⁡ z ↔ ∃ z ∈ D x = ∅ + 𝑜 z ∧ y = B ⁡ z
25 20 24 anbi12d ⊢ C = ∅ → x ∈ C + 𝑜 D ∖ C ∧ ∃ z ∈ D x = C + 𝑜 z ∧ y = B ⁡ z ↔ x ∈ ∅ + 𝑜 D ∧ ∃ z ∈ D x = ∅ + 𝑜 z ∧ y = B ⁡ z
26 oa0r ⊢ D ∈ On → ∅ + 𝑜 D = D
27 26 eleq2d ⊢ D ∈ On → x ∈ ∅ + 𝑜 D ↔ x ∈ D
28 onelon ⊢ D ∈ On ∧ z ∈ D → z ∈ On
29 oa0r ⊢ z ∈ On → ∅ + 𝑜 z = z
30 29 eqeq2d ⊢ z ∈ On → x = ∅ + 𝑜 z ↔ x = z
31 30 anbi1d ⊢ z ∈ On → x = ∅ + 𝑜 z ∧ y = B ⁡ z ↔ x = z ∧ y = B ⁡ z
32 28 31 syl ⊢ D ∈ On ∧ z ∈ D → x = ∅ + 𝑜 z ∧ y = B ⁡ z ↔ x = z ∧ y = B ⁡ z
33 32 rexbidva ⊢ D ∈ On → ∃ z ∈ D x = ∅ + 𝑜 z ∧ y = B ⁡ z ↔ ∃ z ∈ D x = z ∧ y = B ⁡ z
34 27 33 anbi12d ⊢ D ∈ On → x ∈ ∅ + 𝑜 D ∧ ∃ z ∈ D x = ∅ + 𝑜 z ∧ y = B ⁡ z ↔ x ∈ D ∧ ∃ z ∈ D x = z ∧ y = B ⁡ z
35 df-rex ⊢ ∃ z ∈ D x = z ∧ y = B ⁡ z ↔ ∃ z z ∈ D ∧ x = z ∧ y = B ⁡ z
36 an12 ⊢ z ∈ D ∧ x = z ∧ y = B ⁡ z ↔ x = z ∧ z ∈ D ∧ y = B ⁡ z
37 eqcom ⊢ x = z ↔ z = x
38 37 anbi1i ⊢ x = z ∧ z ∈ D ∧ y = B ⁡ z ↔ z = x ∧ z ∈ D ∧ y = B ⁡ z
39 36 38 bitri ⊢ z ∈ D ∧ x = z ∧ y = B ⁡ z ↔ z = x ∧ z ∈ D ∧ y = B ⁡ z
40 39 exbii ⊢ ∃ z z ∈ D ∧ x = z ∧ y = B ⁡ z ↔ ∃ z z = x ∧ z ∈ D ∧ y = B ⁡ z
41 eleq1w ⊢ z = x → z ∈ D ↔ x ∈ D
42 fveq2 ⊢ z = x → B ⁡ z = B ⁡ x
43 42 eqeq2d ⊢ z = x → y = B ⁡ z ↔ y = B ⁡ x
44 41 43 anbi12d ⊢ z = x → z ∈ D ∧ y = B ⁡ z ↔ x ∈ D ∧ y = B ⁡ x
45 44 equsexvw ⊢ ∃ z z = x ∧ z ∈ D ∧ y = B ⁡ z ↔ x ∈ D ∧ y = B ⁡ x
46 35 40 45 3bitri ⊢ ∃ z ∈ D x = z ∧ y = B ⁡ z ↔ x ∈ D ∧ y = B ⁡ x
47 46 baib ⊢ x ∈ D → ∃ z ∈ D x = z ∧ y = B ⁡ z ↔ y = B ⁡ x
48 47 adantl ⊢ B Fn D ∧ x ∈ D → ∃ z ∈ D x = z ∧ y = B ⁡ z ↔ y = B ⁡ x
49 eqcom ⊢ y = B ⁡ x ↔ B ⁡ x = y
50 48 49 bitrdi ⊢ B Fn D ∧ x ∈ D → ∃ z ∈ D x = z ∧ y = B ⁡ z ↔ B ⁡ x = y
51 fnbrfvb ⊢ B Fn D ∧ x ∈ D → B ⁡ x = y ↔ x B y
52 50 51 bitrd ⊢ B Fn D ∧ x ∈ D → ∃ z ∈ D x = z ∧ y = B ⁡ z ↔ x B y
53 52 pm5.32da ⊢ B Fn D → x ∈ D ∧ ∃ z ∈ D x = z ∧ y = B ⁡ z ↔ x ∈ D ∧ x B y
54 fnbr ⊢ B Fn D ∧ x B y → x ∈ D
55 54 ex ⊢ B Fn D → x B y → x ∈ D
56 55 pm4.71rd ⊢ B Fn D → x B y ↔ x ∈ D ∧ x B y
57 df-br ⊢ x B y ↔ x y ∈ B
58 56 57 bitr3di ⊢ B Fn D → x ∈ D ∧ x B y ↔ x y ∈ B
59 53 58 bitrd ⊢ B Fn D → x ∈ D ∧ ∃ z ∈ D x = z ∧ y = B ⁡ z ↔ x y ∈ B
60 34 59 sylan9bbr ⊢ B Fn D ∧ D ∈ On → x ∈ ∅ + 𝑜 D ∧ ∃ z ∈ D x = ∅ + 𝑜 z ∧ y = B ⁡ z ↔ x y ∈ B
61 25 60 sylan9bbr ⊢ B Fn D ∧ D ∈ On ∧ C = ∅ → x ∈ C + 𝑜 D ∖ C ∧ ∃ z ∈ D x = C + 𝑜 z ∧ y = B ⁡ z ↔ x y ∈ B
62 61 opabbidv ⊢ B Fn D ∧ D ∈ On ∧ C = ∅ → x y | x ∈ C + 𝑜 D ∖ C ∧ ∃ z ∈ D x = C + 𝑜 z ∧ y = B ⁡ z = x y | x y ∈ B
63 14 62 syl ⊢ A Fn C ∧ B Fn D ∧ C ∈ On ∧ D ∈ On ∧ A = ∅ → x y | x ∈ C + 𝑜 D ∖ C ∧ ∃ z ∈ D x = C + 𝑜 z ∧ y = B ⁡ z = x y | x y ∈ B
64 fnrel ⊢ B Fn D → Rel ⁡ B
65 opabid2 ⊢ Rel ⁡ B → x y | x y ∈ B = B
66 64 65 syl ⊢ B Fn D → x y | x y ∈ B = B
67 66 adantl ⊢ A Fn C ∧ B Fn D → x y | x y ∈ B = B
68 67 ad2antrr ⊢ A Fn C ∧ B Fn D ∧ C ∈ On ∧ D ∈ On ∧ A = ∅ → x y | x y ∈ B = B
69 63 68 eqtrd ⊢ A Fn C ∧ B Fn D ∧ C ∈ On ∧ D ∈ On ∧ A = ∅ → x y | x ∈ C + 𝑜 D ∖ C ∧ ∃ z ∈ D x = C + 𝑜 z ∧ y = B ⁡ z = B
70 2 69 uneq12d ⊢ A Fn C ∧ B Fn D ∧ C ∈ On ∧ D ∈ On ∧ A = ∅ → A ∪ x y | x ∈ C + 𝑜 D ∖ C ∧ ∃ z ∈ D x = C + 𝑜 z ∧ y = B ⁡ z = ∅ ∪ B
71 0un ⊢ ∅ ∪ B = B
72 70 71 eqtrdi ⊢ A Fn C ∧ B Fn D ∧ C ∈ On ∧ D ∈ On ∧ A = ∅ → A ∪ x y | x ∈ C + 𝑜 D ∖ C ∧ ∃ z ∈ D x = C + 𝑜 z ∧ y = B ⁡ z = B
73 72 ex ⊢ A Fn C ∧ B Fn D ∧ C ∈ On ∧ D ∈ On → A = ∅ → A ∪ x y | x ∈ C + 𝑜 D ∖ C ∧ ∃ z ∈ D x = C + 𝑜 z ∧ y = B ⁡ z = B
74 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
75 74 eqeq1d ⊢ A Fn C ∧ B Fn D ∧ C ∈ On ∧ D ∈ On → A + ˙ B = B ↔ A ∪ x y | x ∈ C + 𝑜 D ∖ C ∧ ∃ z ∈ D x = C + 𝑜 z ∧ y = B ⁡ z = B
76 73 75 sylibrd ⊢ A Fn C ∧ B Fn D ∧ C ∈ On ∧ D ∈ On → A = ∅ → A + ˙ B = B