Metamath Proof Explorer


Theorem symgextfo

Description: The extension of a permutation, fixing the additional element, is an onto function. (Contributed by AV, 7-Jan-2019)

Ref Expression
Hypotheses symgext.s S=BaseSymGrpNK
symgext.e E=xNifx=KKZx
Assertion symgextfo KNZSE:NontoN

Proof

Step Hyp Ref Expression
1 symgext.s S=BaseSymGrpNK
2 symgext.e E=xNifx=KKZx
3 1 2 symgextf KNZSE:NN
4 eqid SymGrpNK=SymGrpNK
5 4 1 symgbasf1o ZSZ:NK1-1 ontoNK
6 f1ofo Z:NK1-1 ontoNKZ:NKontoNK
7 5 6 syl ZSZ:NKontoNK
8 7 adantl KNZSZ:NKontoNK
9 dffo3 Z:NKontoNKZ:NKNKkNKiNKk=Zi
10 8 9 sylib KNZSZ:NKNKkNKiNKk=Zi
11 10 simprd KNZSkNKiNKk=Zi
12 1 2 symgextfv KNZSiNKEi=Zi
13 12 imp KNZSiNKEi=Zi
14 13 eqeq2d KNZSiNKk=Eik=Zi
15 14 rexbidva KNZSiNKk=EiiNKk=Zi
16 15 ralbidv KNZSkNKiNKk=EikNKiNKk=Zi
17 11 16 mpbird KNZSkNKiNKk=Ei
18 difssd kNKNKN
19 ssrexv NKNiNKk=EiiNk=Ei
20 18 19 syl kNKiNKk=EiiNk=Ei
21 20 ralimia kNKiNKk=EikNKiNk=Ei
22 17 21 syl KNZSkNKiNk=Ei
23 simpl KNZSKN
24 1 2 symgextfve KNi=KEi=K
25 24 adantr KNZSi=KEi=K
26 25 imp KNZSi=KEi=K
27 26 eqcomd KNZSi=KK=Ei
28 23 27 rspcedeq2vd KNZSiNK=Ei
29 eqeq1 k=Kk=EiK=Ei
30 29 rexbidv k=KiNk=EiiNK=Ei
31 30 ralunsn KNkNKKiNk=EikNKiNk=EiiNK=Ei
32 31 adantr KNZSkNKKiNk=EikNKiNk=EiiNK=Ei
33 22 28 32 mpbir2and KNZSkNKKiNk=Ei
34 difsnid KNNKK=N
35 34 eqcomd KNN=NKK
36 35 raleqdv KNkNiNk=EikNKKiNk=Ei
37 36 adantr KNZSkNiNk=EikNKKiNk=Ei
38 33 37 mpbird KNZSkNiNk=Ei
39 dffo3 E:NontoNE:NNkNiNk=Ei
40 3 38 39 sylanbrc KNZSE:NontoN