Metamath Proof Explorer


Theorem symgextres

Description: The restriction of the extension of a permutation, fixing the additional element, to the original domain. (Contributed by AV, 6-Jan-2019)

Ref Expression
Hypotheses symgext.s 𝑆 = ( Base ‘ ( SymGrp ‘ ( 𝑁 ∖ { 𝐾 } ) ) )
symgext.e 𝐸 = ( 𝑥𝑁 ↦ if ( 𝑥 = 𝐾 , 𝐾 , ( 𝑍𝑥 ) ) )
Assertion symgextres ( ( 𝐾𝑁𝑍𝑆 ) → ( 𝐸 ↾ ( 𝑁 ∖ { 𝐾 } ) ) = 𝑍 )

Proof

Step Hyp Ref Expression
1 symgext.s 𝑆 = ( Base ‘ ( SymGrp ‘ ( 𝑁 ∖ { 𝐾 } ) ) )
2 symgext.e 𝐸 = ( 𝑥𝑁 ↦ if ( 𝑥 = 𝐾 , 𝐾 , ( 𝑍𝑥 ) ) )
3 1 2 symgextfv ( ( 𝐾𝑁𝑍𝑆 ) → ( 𝑖 ∈ ( 𝑁 ∖ { 𝐾 } ) → ( 𝐸𝑖 ) = ( 𝑍𝑖 ) ) )
4 3 ralrimiv ( ( 𝐾𝑁𝑍𝑆 ) → ∀ 𝑖 ∈ ( 𝑁 ∖ { 𝐾 } ) ( 𝐸𝑖 ) = ( 𝑍𝑖 ) )
5 1 2 symgextf ( ( 𝐾𝑁𝑍𝑆 ) → 𝐸 : 𝑁𝑁 )
6 5 ffnd ( ( 𝐾𝑁𝑍𝑆 ) → 𝐸 Fn 𝑁 )
7 eqid ( SymGrp ‘ ( 𝑁 ∖ { 𝐾 } ) ) = ( SymGrp ‘ ( 𝑁 ∖ { 𝐾 } ) )
8 7 1 symgbasf ( 𝑍𝑆𝑍 : ( 𝑁 ∖ { 𝐾 } ) ⟶ ( 𝑁 ∖ { 𝐾 } ) )
9 8 ffnd ( 𝑍𝑆𝑍 Fn ( 𝑁 ∖ { 𝐾 } ) )
10 9 adantl ( ( 𝐾𝑁𝑍𝑆 ) → 𝑍 Fn ( 𝑁 ∖ { 𝐾 } ) )
11 difssd ( ( 𝐾𝑁𝑍𝑆 ) → ( 𝑁 ∖ { 𝐾 } ) ⊆ 𝑁 )
12 fvreseq1 ( ( ( 𝐸 Fn 𝑁𝑍 Fn ( 𝑁 ∖ { 𝐾 } ) ) ∧ ( 𝑁 ∖ { 𝐾 } ) ⊆ 𝑁 ) → ( ( 𝐸 ↾ ( 𝑁 ∖ { 𝐾 } ) ) = 𝑍 ↔ ∀ 𝑖 ∈ ( 𝑁 ∖ { 𝐾 } ) ( 𝐸𝑖 ) = ( 𝑍𝑖 ) ) )
13 6 10 11 12 syl21anc ( ( 𝐾𝑁𝑍𝑆 ) → ( ( 𝐸 ↾ ( 𝑁 ∖ { 𝐾 } ) ) = 𝑍 ↔ ∀ 𝑖 ∈ ( 𝑁 ∖ { 𝐾 } ) ( 𝐸𝑖 ) = ( 𝑍𝑖 ) ) )
14 4 13 mpbird ( ( 𝐾𝑁𝑍𝑆 ) → ( 𝐸 ↾ ( 𝑁 ∖ { 𝐾 } ) ) = 𝑍 )