Metamath Proof Explorer


Theorem fnunsn

Description: Extension of a function with a new ordered pair. (Contributed by NM, 28-Sep-2013) (Revised by Mario Carneiro, 30-Apr-2015)

Ref Expression
Hypotheses fnunop.x φ X V
fnunop.y φ Y V
fnunop.f φ F Fn D
fnunop.g G = F X Y
fnunop.e E = D X
fnunop.d φ ¬ X D
Assertion fnunsn φ G Fn E

Proof

Step Hyp Ref Expression
1 fnunop.x φ X V
2 fnunop.y φ Y V
3 fnunop.f φ F Fn D
4 fnunop.g G = F X Y
5 fnunop.e E = D X
6 fnunop.d φ ¬ X D
7 fnsng X V Y V X Y Fn X
8 1 2 7 syl2anc φ X Y Fn X
9 disjsn D X = ¬ X D
10 6 9 sylibr φ D X =
11 fnun F Fn D X Y Fn X D X = F X Y Fn D X
12 3 8 10 11 syl21anc φ F X Y Fn D X
13 4 fneq1i G Fn E F X Y Fn E
14 5 fneq2i F X Y Fn E F X Y Fn D X
15 13 14 bitri G Fn E F X Y Fn D X
16 12 15 sylibr φ G Fn E