Metamath Proof Explorer


Theorem fntpg

Description: Function with a domain of three different values. (Contributed by Alexander van der Vekens, 5-Dec-2017)

Ref Expression
Assertion fntpg X U Y V Z W A F B G C H X Y X Z Y Z X A Y B Z C Fn X Y Z

Proof

Step Hyp Ref Expression
1 funtpg X U Y V Z W A F B G C H X Y X Z Y Z Fun X A Y B Z C
2 dmsnopg A F dom X A = X
3 2 3ad2ant1 A F B G C H dom X A = X
4 dmsnopg B G dom Y B = Y
5 4 3ad2ant2 A F B G C H dom Y B = Y
6 3 5 jca A F B G C H dom X A = X dom Y B = Y
7 6 3ad2ant2 X U Y V Z W A F B G C H X Y X Z Y Z dom X A = X dom Y B = Y
8 uneq12 dom X A = X dom Y B = Y dom X A dom Y B = X Y
9 7 8 syl X U Y V Z W A F B G C H X Y X Z Y Z dom X A dom Y B = X Y
10 df-pr X Y = X Y
11 9 10 eqtr4di X U Y V Z W A F B G C H X Y X Z Y Z dom X A dom Y B = X Y
12 df-pr X A Y B = X A Y B
13 12 dmeqi dom X A Y B = dom X A Y B
14 13 eqeq1i dom X A Y B = X Y dom X A Y B = X Y
15 dmun dom X A Y B = dom X A dom Y B
16 15 eqeq1i dom X A Y B = X Y dom X A dom Y B = X Y
17 14 16 bitri dom X A Y B = X Y dom X A dom Y B = X Y
18 11 17 sylibr X U Y V Z W A F B G C H X Y X Z Y Z dom X A Y B = X Y
19 dmsnopg C H dom Z C = Z
20 19 3ad2ant3 A F B G C H dom Z C = Z
21 20 3ad2ant2 X U Y V Z W A F B G C H X Y X Z Y Z dom Z C = Z
22 18 21 uneq12d X U Y V Z W A F B G C H X Y X Z Y Z dom X A Y B dom Z C = X Y Z
23 df-tp X A Y B Z C = X A Y B Z C
24 23 dmeqi dom X A Y B Z C = dom X A Y B Z C
25 dmun dom X A Y B Z C = dom X A Y B dom Z C
26 24 25 eqtri dom X A Y B Z C = dom X A Y B dom Z C
27 df-tp X Y Z = X Y Z
28 22 26 27 3eqtr4g X U Y V Z W A F B G C H X Y X Z Y Z dom X A Y B Z C = X Y Z
29 df-fn X A Y B Z C Fn X Y Z Fun X A Y B Z C dom X A Y B Z C = X Y Z
30 1 28 29 sylanbrc X U Y V Z W A F B G C H X Y X Z Y Z X A Y B Z C Fn X Y Z