Metamath Proof Explorer


Theorem signswplusg

Description: The operation of W . (Contributed by Thierry Arnoux, 9-Sep-2018)

Ref Expression
Hypotheses signsw.p âŠĒ âĻĢ = ( 𝑎 ∈ { - 1 , 0 , 1 } , 𝑏 ∈ { - 1 , 0 , 1 } â†Ķ if ( 𝑏 = 0 , 𝑎 , 𝑏 ) )
signsw.w âŠĒ 𝑊 = { âŸĻ ( Base ‘ ndx ) , { - 1 , 0 , 1 } âŸĐ , âŸĻ ( +g ‘ ndx ) , âĻĢ âŸĐ }
Assertion signswplusg âĻĢ = ( +g ‘ 𝑊 )

Proof

Step Hyp Ref Expression
1 signsw.p âŠĒ âĻĢ = ( 𝑎 ∈ { - 1 , 0 , 1 } , 𝑏 ∈ { - 1 , 0 , 1 } â†Ķ if ( 𝑏 = 0 , 𝑎 , 𝑏 ) )
2 signsw.w âŠĒ 𝑊 = { âŸĻ ( Base ‘ ndx ) , { - 1 , 0 , 1 } âŸĐ , âŸĻ ( +g ‘ ndx ) , âĻĢ âŸĐ }
3 tpex âŠĒ { - 1 , 0 , 1 } ∈ V
4 3 3 mpoex âŠĒ ( 𝑎 ∈ { - 1 , 0 , 1 } , 𝑏 ∈ { - 1 , 0 , 1 } â†Ķ if ( 𝑏 = 0 , 𝑎 , 𝑏 ) ) ∈ V
5 1 4 eqeltri âŠĒ âĻĢ ∈ V
6 2 grpplusg âŠĒ ( âĻĢ ∈ V → âĻĢ = ( +g ‘ 𝑊 ) )
7 5 6 ax-mp âŠĒ âĻĢ = ( +g ‘ 𝑊 )