Metamath Proof Explorer


Theorem up1st2ndb

Description: Combine/separate parts in the universal property predicate. (Contributed by Zhi Wang, 23-Oct-2025)

Ref Expression
Hypothesis up1st2ndr.1 ( 𝜑𝐹 ∈ ( 𝐷 Func 𝐸 ) )
Assertion up1st2ndb ( 𝜑 → ( 𝑋 ( 𝐹 ( 𝐷 UP 𝐸 ) 𝑊 ) 𝑀𝑋 ( ⟨ ( 1st𝐹 ) , ( 2nd𝐹 ) ⟩ ( 𝐷 UP 𝐸 ) 𝑊 ) 𝑀 ) )

Proof

Step Hyp Ref Expression
1 up1st2ndr.1 ( 𝜑𝐹 ∈ ( 𝐷 Func 𝐸 ) )
2 simpr ( ( 𝜑𝑋 ( 𝐹 ( 𝐷 UP 𝐸 ) 𝑊 ) 𝑀 ) → 𝑋 ( 𝐹 ( 𝐷 UP 𝐸 ) 𝑊 ) 𝑀 )
3 2 up1st2nd ( ( 𝜑𝑋 ( 𝐹 ( 𝐷 UP 𝐸 ) 𝑊 ) 𝑀 ) → 𝑋 ( ⟨ ( 1st𝐹 ) , ( 2nd𝐹 ) ⟩ ( 𝐷 UP 𝐸 ) 𝑊 ) 𝑀 )
4 1 adantr ( ( 𝜑𝑋 ( ⟨ ( 1st𝐹 ) , ( 2nd𝐹 ) ⟩ ( 𝐷 UP 𝐸 ) 𝑊 ) 𝑀 ) → 𝐹 ∈ ( 𝐷 Func 𝐸 ) )
5 simpr ( ( 𝜑𝑋 ( ⟨ ( 1st𝐹 ) , ( 2nd𝐹 ) ⟩ ( 𝐷 UP 𝐸 ) 𝑊 ) 𝑀 ) → 𝑋 ( ⟨ ( 1st𝐹 ) , ( 2nd𝐹 ) ⟩ ( 𝐷 UP 𝐸 ) 𝑊 ) 𝑀 )
6 4 5 up1st2ndr ( ( 𝜑𝑋 ( ⟨ ( 1st𝐹 ) , ( 2nd𝐹 ) ⟩ ( 𝐷 UP 𝐸 ) 𝑊 ) 𝑀 ) → 𝑋 ( 𝐹 ( 𝐷 UP 𝐸 ) 𝑊 ) 𝑀 )
7 3 6 impbida ( 𝜑 → ( 𝑋 ( 𝐹 ( 𝐷 UP 𝐸 ) 𝑊 ) 𝑀𝑋 ( ⟨ ( 1st𝐹 ) , ( 2nd𝐹 ) ⟩ ( 𝐷 UP 𝐸 ) 𝑊 ) 𝑀 ) )