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 syl5bi 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