Metamath Proof Explorer


Theorem 2arympt

Description: A binary (endo)function in maps-to notation. (Contributed by AV, 20-May-2024)

Ref Expression
Hypothesis 2arympt.f 𝐹 = ( 𝑥 ∈ ( 𝑋m { 0 , 1 } ) ↦ ( ( 𝑥 ‘ 0 ) 𝑂 ( 𝑥 ‘ 1 ) ) )
Assertion 2arympt ( ( 𝑋𝑉𝑂 : ( 𝑋 × 𝑋 ) ⟶ 𝑋 ) → 𝐹 ∈ ( 2 -aryF 𝑋 ) )

Proof

Step Hyp Ref Expression
1 2arympt.f 𝐹 = ( 𝑥 ∈ ( 𝑋m { 0 , 1 } ) ↦ ( ( 𝑥 ‘ 0 ) 𝑂 ( 𝑥 ‘ 1 ) ) )
2 simplr ( ( ( 𝑋𝑉𝑂 : ( 𝑋 × 𝑋 ) ⟶ 𝑋 ) ∧ 𝑥 ∈ ( 𝑋m { 0 , 1 } ) ) → 𝑂 : ( 𝑋 × 𝑋 ) ⟶ 𝑋 )
3 elmapi ( 𝑥 ∈ ( 𝑋m { 0 , 1 } ) → 𝑥 : { 0 , 1 } ⟶ 𝑋 )
4 0elpr01 0 ∈ { 0 , 1 }
5 4 a1i ( 𝑥 ∈ ( 𝑋m { 0 , 1 } ) → 0 ∈ { 0 , 1 } )
6 3 5 ffvelcdmd ( 𝑥 ∈ ( 𝑋m { 0 , 1 } ) → ( 𝑥 ‘ 0 ) ∈ 𝑋 )
7 6 adantl ( ( ( 𝑋𝑉𝑂 : ( 𝑋 × 𝑋 ) ⟶ 𝑋 ) ∧ 𝑥 ∈ ( 𝑋m { 0 , 1 } ) ) → ( 𝑥 ‘ 0 ) ∈ 𝑋 )
8 1elpr01 1 ∈ { 0 , 1 }
9 8 a1i ( 𝑥 ∈ ( 𝑋m { 0 , 1 } ) → 1 ∈ { 0 , 1 } )
10 3 9 ffvelcdmd ( 𝑥 ∈ ( 𝑋m { 0 , 1 } ) → ( 𝑥 ‘ 1 ) ∈ 𝑋 )
11 10 adantl ( ( ( 𝑋𝑉𝑂 : ( 𝑋 × 𝑋 ) ⟶ 𝑋 ) ∧ 𝑥 ∈ ( 𝑋m { 0 , 1 } ) ) → ( 𝑥 ‘ 1 ) ∈ 𝑋 )
12 2 7 11 fovcdmd ( ( ( 𝑋𝑉𝑂 : ( 𝑋 × 𝑋 ) ⟶ 𝑋 ) ∧ 𝑥 ∈ ( 𝑋m { 0 , 1 } ) ) → ( ( 𝑥 ‘ 0 ) 𝑂 ( 𝑥 ‘ 1 ) ) ∈ 𝑋 )
13 12 1 fmptd ( ( 𝑋𝑉𝑂 : ( 𝑋 × 𝑋 ) ⟶ 𝑋 ) → 𝐹 : ( 𝑋m { 0 , 1 } ) ⟶ 𝑋 )
14 2aryfvalel ( 𝑋𝑉 → ( 𝐹 ∈ ( 2 -aryF 𝑋 ) ↔ 𝐹 : ( 𝑋m { 0 , 1 } ) ⟶ 𝑋 ) )
15 14 adantr ( ( 𝑋𝑉𝑂 : ( 𝑋 × 𝑋 ) ⟶ 𝑋 ) → ( 𝐹 ∈ ( 2 -aryF 𝑋 ) ↔ 𝐹 : ( 𝑋m { 0 , 1 } ) ⟶ 𝑋 ) )
16 13 15 mpbird ( ( 𝑋𝑉𝑂 : ( 𝑋 × 𝑋 ) ⟶ 𝑋 ) → 𝐹 ∈ ( 2 -aryF 𝑋 ) )