Metamath Proof Explorer


Theorem opco1

Description: Value of an operation precomposed with the projection on the first component. (Contributed by Mario Carneiro, 28-May-2014) Generalize to closed form. (Revised by BJ, 27-Oct-2024)

Ref Expression
Hypotheses opco1.exa ( 𝜑𝐴𝑉 )
opco1.exb ( 𝜑𝐵𝑊 )
Assertion opco1 ( 𝜑 → ( 𝐴 ( 𝐹 ∘ 1st ) 𝐵 ) = ( 𝐹𝐴 ) )

Proof

Step Hyp Ref Expression
1 opco1.exa ( 𝜑𝐴𝑉 )
2 opco1.exb ( 𝜑𝐵𝑊 )
3 df-ov ( 𝐴 ( 𝐹 ∘ 1st ) 𝐵 ) = ( ( 𝐹 ∘ 1st ) ‘ ⟨ 𝐴 , 𝐵 ⟩ )
4 3 a1i ( 𝜑 → ( 𝐴 ( 𝐹 ∘ 1st ) 𝐵 ) = ( ( 𝐹 ∘ 1st ) ‘ ⟨ 𝐴 , 𝐵 ⟩ ) )
5 fo1st 1st : V –onto→ V
6 fof ( 1st : V –onto→ V → 1st : V ⟶ V )
7 5 6 mp1i ( 𝜑 → 1st : V ⟶ V )
8 opex 𝐴 , 𝐵 ⟩ ∈ V
9 8 a1i ( 𝜑 → ⟨ 𝐴 , 𝐵 ⟩ ∈ V )
10 7 9 fvco3d ( 𝜑 → ( ( 𝐹 ∘ 1st ) ‘ ⟨ 𝐴 , 𝐵 ⟩ ) = ( 𝐹 ‘ ( 1st ‘ ⟨ 𝐴 , 𝐵 ⟩ ) ) )
11 op1stg ( ( 𝐴𝑉𝐵𝑊 ) → ( 1st ‘ ⟨ 𝐴 , 𝐵 ⟩ ) = 𝐴 )
12 1 2 11 syl2anc ( 𝜑 → ( 1st ‘ ⟨ 𝐴 , 𝐵 ⟩ ) = 𝐴 )
13 12 fveq2d ( 𝜑 → ( 𝐹 ‘ ( 1st ‘ ⟨ 𝐴 , 𝐵 ⟩ ) ) = ( 𝐹𝐴 ) )
14 4 10 13 3eqtrd ( 𝜑 → ( 𝐴 ( 𝐹 ∘ 1st ) 𝐵 ) = ( 𝐹𝐴 ) )