Theorem uprcl5

Description: Reverse closure for the class of universal property. (Contributed by Zhi Wang, 25-Sep-2025)

	Ref	Expression
Hypotheses	uprcl2.x	⊢ ( 𝜑 → 𝑋 ( ⟨ 𝐹 , 𝐺 ⟩ ( 𝐷 UP 𝐸 ) 𝑊 ) 𝑀 )
	uprcl5.j	⊢ 𝐽 = ( Hom ‘ 𝐸 )
Assertion	uprcl5	⊢ ( 𝜑 → 𝑀 ∈ ( 𝑊 𝐽 ( 𝐹 ‘ 𝑋 ) ) )

Proof

Step	Hyp	Ref	Expression
1		uprcl2.x	⊢ ( 𝜑 → 𝑋 ( ⟨ 𝐹 , 𝐺 ⟩ ( 𝐷 UP 𝐸 ) 𝑊 ) 𝑀 )
2		uprcl5.j	⊢ 𝐽 = ( Hom ‘ 𝐸 )
3		eqid	⊢ ( Base ‘ 𝐷 ) = ( Base ‘ 𝐷 )
4		eqid	⊢ ( Base ‘ 𝐸 ) = ( Base ‘ 𝐸 )
5		eqid	⊢ ( Hom ‘ 𝐷 ) = ( Hom ‘ 𝐷 )
6		eqid	⊢ ( comp ‘ 𝐸 ) = ( comp ‘ 𝐸 )
7	1 4	uprcl3	⊢ ( 𝜑 → 𝑊 ∈ ( Base ‘ 𝐸 ) )
8	1	uprcl2	⊢ ( 𝜑 → 𝐹 ( 𝐷 Func 𝐸 ) 𝐺 )
9	3 4 5 2 6 7 8	isuplem	⊢ ( 𝜑 → ( 𝑋 ( ⟨ 𝐹 , 𝐺 ⟩ ( 𝐷 UP 𝐸 ) 𝑊 ) 𝑀 ↔ ( ( 𝑋 ∈ ( Base ‘ 𝐷 ) ∧ 𝑀 ∈ ( 𝑊 𝐽 ( 𝐹 ‘ 𝑋 ) ) ) ∧ ∀ 𝑦 ∈ ( Base ‘ 𝐷 ) ∀ 𝑔 ∈ ( 𝑊 𝐽 ( 𝐹 ‘ 𝑦 ) ) ∃! 𝑘 ∈ ( 𝑋 ( Hom ‘ 𝐷 ) 𝑦 ) 𝑔 = ( ( ( 𝑋 𝐺 𝑦 ) ‘ 𝑘 ) ( ⟨ 𝑊 , ( 𝐹 ‘ 𝑋 ) ⟩ ( comp ‘ 𝐸 ) ( 𝐹 ‘ 𝑦 ) ) 𝑀 ) ) ) )
10	1 9	mpbid	⊢ ( 𝜑 → ( ( 𝑋 ∈ ( Base ‘ 𝐷 ) ∧ 𝑀 ∈ ( 𝑊 𝐽 ( 𝐹 ‘ 𝑋 ) ) ) ∧ ∀ 𝑦 ∈ ( Base ‘ 𝐷 ) ∀ 𝑔 ∈ ( 𝑊 𝐽 ( 𝐹 ‘ 𝑦 ) ) ∃! 𝑘 ∈ ( 𝑋 ( Hom ‘ 𝐷 ) 𝑦 ) 𝑔 = ( ( ( 𝑋 𝐺 𝑦 ) ‘ 𝑘 ) ( ⟨ 𝑊 , ( 𝐹 ‘ 𝑋 ) ⟩ ( comp ‘ 𝐸 ) ( 𝐹 ‘ 𝑦 ) ) 𝑀 ) ) )
11	10	simplrd	⊢ ( 𝜑 → 𝑀 ∈ ( 𝑊 𝐽 ( 𝐹 ‘ 𝑋 ) ) )