Metamath Proof Explorer


Theorem eqfunresadj

Description: Law for adjoining an element to restrictions of functions. (Contributed by Scott Fenton, 6-Dec-2021)

Ref Expression
Assertion eqfunresadj ⊢ Fun ⁡ F ∧ Fun ⁡ G ∧ F ↾ X = G ↾ X ∧ Y ∈ dom ⁡ F ∧ Y ∈ dom ⁡ G ∧ F ⁡ Y = G ⁡ Y → F ↾ X ∪ Y = G ↾ X ∪ Y

Proof

Step Hyp Ref Expression
1 relres ⊢ Rel ⁡ F ↾ X ∪ Y
2 relres ⊢ Rel ⁡ G ↾ X ∪ Y
3 breq ⊢ F ↾ X = G ↾ X → x F ↾ X y ↔ x G ↾ X y
4 3 3ad2ant2 ⊢ Fun ⁡ F ∧ Fun ⁡ G ∧ F ↾ X = G ↾ X ∧ Y ∈ dom ⁡ F ∧ Y ∈ dom ⁡ G ∧ F ⁡ Y = G ⁡ Y → x F ↾ X y ↔ x G ↾ X y
5 velsn ⊢ x ∈ Y ↔ x = Y
6 simp33 ⊢ Fun ⁡ F ∧ Fun ⁡ G ∧ F ↾ X = G ↾ X ∧ Y ∈ dom ⁡ F ∧ Y ∈ dom ⁡ G ∧ F ⁡ Y = G ⁡ Y → F ⁡ Y = G ⁡ Y
7 6 eqeq1d ⊢ Fun ⁡ F ∧ Fun ⁡ G ∧ F ↾ X = G ↾ X ∧ Y ∈ dom ⁡ F ∧ Y ∈ dom ⁡ G ∧ F ⁡ Y = G ⁡ Y → F ⁡ Y = y ↔ G ⁡ Y = y
8 simp1l ⊢ Fun ⁡ F ∧ Fun ⁡ G ∧ F ↾ X = G ↾ X ∧ Y ∈ dom ⁡ F ∧ Y ∈ dom ⁡ G ∧ F ⁡ Y = G ⁡ Y → Fun ⁡ F
9 simp31 ⊢ Fun ⁡ F ∧ Fun ⁡ G ∧ F ↾ X = G ↾ X ∧ Y ∈ dom ⁡ F ∧ Y ∈ dom ⁡ G ∧ F ⁡ Y = G ⁡ Y → Y ∈ dom ⁡ F
10 funbrfvb ⊢ Fun ⁡ F ∧ Y ∈ dom ⁡ F → F ⁡ Y = y ↔ Y F y
11 8 9 10 syl2anc ⊢ Fun ⁡ F ∧ Fun ⁡ G ∧ F ↾ X = G ↾ X ∧ Y ∈ dom ⁡ F ∧ Y ∈ dom ⁡ G ∧ F ⁡ Y = G ⁡ Y → F ⁡ Y = y ↔ Y F y
12 simp1r ⊢ Fun ⁡ F ∧ Fun ⁡ G ∧ F ↾ X = G ↾ X ∧ Y ∈ dom ⁡ F ∧ Y ∈ dom ⁡ G ∧ F ⁡ Y = G ⁡ Y → Fun ⁡ G
13 simp32 ⊢ Fun ⁡ F ∧ Fun ⁡ G ∧ F ↾ X = G ↾ X ∧ Y ∈ dom ⁡ F ∧ Y ∈ dom ⁡ G ∧ F ⁡ Y = G ⁡ Y → Y ∈ dom ⁡ G
14 funbrfvb ⊢ Fun ⁡ G ∧ Y ∈ dom ⁡ G → G ⁡ Y = y ↔ Y G y
15 12 13 14 syl2anc ⊢ Fun ⁡ F ∧ Fun ⁡ G ∧ F ↾ X = G ↾ X ∧ Y ∈ dom ⁡ F ∧ Y ∈ dom ⁡ G ∧ F ⁡ Y = G ⁡ Y → G ⁡ Y = y ↔ Y G y
16 7 11 15 3bitr3d ⊢ Fun ⁡ F ∧ Fun ⁡ G ∧ F ↾ X = G ↾ X ∧ Y ∈ dom ⁡ F ∧ Y ∈ dom ⁡ G ∧ F ⁡ Y = G ⁡ Y → Y F y ↔ Y G y
17 breq1 ⊢ x = Y → x F y ↔ Y F y
18 breq1 ⊢ x = Y → x G y ↔ Y G y
19 17 18 bibi12d ⊢ x = Y → x F y ↔ x G y ↔ Y F y ↔ Y G y
20 16 19 syl5ibrcom ⊢ Fun ⁡ F ∧ Fun ⁡ G ∧ F ↾ X = G ↾ X ∧ Y ∈ dom ⁡ F ∧ Y ∈ dom ⁡ G ∧ F ⁡ Y = G ⁡ Y → x = Y → x F y ↔ x G y
21 5 20 biimtrid ⊢ Fun ⁡ F ∧ Fun ⁡ G ∧ F ↾ X = G ↾ X ∧ Y ∈ dom ⁡ F ∧ Y ∈ dom ⁡ G ∧ F ⁡ Y = G ⁡ Y → x ∈ Y → x F y ↔ x G y
22 21 pm5.32d ⊢ Fun ⁡ F ∧ Fun ⁡ G ∧ F ↾ X = G ↾ X ∧ Y ∈ dom ⁡ F ∧ Y ∈ dom ⁡ G ∧ F ⁡ Y = G ⁡ Y → x ∈ Y ∧ x F y ↔ x ∈ Y ∧ x G y
23 vex ⊢ y ∈ V
24 23 brresi ⊢ x F ↾ Y y ↔ x ∈ Y ∧ x F y
25 23 brresi ⊢ x G ↾ Y y ↔ x ∈ Y ∧ x G y
26 22 24 25 3bitr4g ⊢ Fun ⁡ F ∧ Fun ⁡ G ∧ F ↾ X = G ↾ X ∧ Y ∈ dom ⁡ F ∧ Y ∈ dom ⁡ G ∧ F ⁡ Y = G ⁡ Y → x F ↾ Y y ↔ x G ↾ Y y
27 4 26 orbi12d ⊢ Fun ⁡ F ∧ Fun ⁡ G ∧ F ↾ X = G ↾ X ∧ Y ∈ dom ⁡ F ∧ Y ∈ dom ⁡ G ∧ F ⁡ Y = G ⁡ Y → x F ↾ X y ∨ x F ↾ Y y ↔ x G ↾ X y ∨ x G ↾ Y y
28 resundi ⊢ F ↾ X ∪ Y = F ↾ X ∪ F ↾ Y
29 28 breqi ⊢ x F ↾ X ∪ Y y ↔ x F ↾ X ∪ F ↾ Y y
30 brun ⊢ x F ↾ X ∪ F ↾ Y y ↔ x F ↾ X y ∨ x F ↾ Y y
31 29 30 bitri ⊢ x F ↾ X ∪ Y y ↔ x F ↾ X y ∨ x F ↾ Y y
32 resundi ⊢ G ↾ X ∪ Y = G ↾ X ∪ G ↾ Y
33 32 breqi ⊢ x G ↾ X ∪ Y y ↔ x G ↾ X ∪ G ↾ Y y
34 brun ⊢ x G ↾ X ∪ G ↾ Y y ↔ x G ↾ X y ∨ x G ↾ Y y
35 33 34 bitri ⊢ x G ↾ X ∪ Y y ↔ x G ↾ X y ∨ x G ↾ Y y
36 27 31 35 3bitr4g ⊢ Fun ⁡ F ∧ Fun ⁡ G ∧ F ↾ X = G ↾ X ∧ Y ∈ dom ⁡ F ∧ Y ∈ dom ⁡ G ∧ F ⁡ Y = G ⁡ Y → x F ↾ X ∪ Y y ↔ x G ↾ X ∪ Y y
37 1 2 36 eqbrrdiv ⊢ Fun ⁡ F ∧ Fun ⁡ G ∧ F ↾ X = G ↾ X ∧ Y ∈ dom ⁡ F ∧ Y ∈ dom ⁡ G ∧ F ⁡ Y = G ⁡ Y → F ↾ X ∪ Y = G ↾ X ∪ Y