Metamath Proof Explorer


Theorem mthmi

Description: A statement whose reduct is the reduct of a provable pre-statement is a theorem. (Contributed by Mario Carneiro, 18-Jul-2016)

Ref Expression
Hypotheses mthmval.r 𝑅 = ( mStRed ‘ 𝑇 )
mthmval.j 𝐽 = ( mPPSt ‘ 𝑇 )
mthmval.u 𝑈 = ( mThm ‘ 𝑇 )
Assertion mthmi ( ( 𝑋𝐽 ∧ ( 𝑅𝑋 ) = ( 𝑅𝑌 ) ) → 𝑌𝑈 )

Proof

Step Hyp Ref Expression
1 mthmval.r 𝑅 = ( mStRed ‘ 𝑇 )
2 mthmval.j 𝐽 = ( mPPSt ‘ 𝑇 )
3 mthmval.u 𝑈 = ( mThm ‘ 𝑇 )
4 fveqeq2 ( 𝑥 = 𝑋 → ( ( 𝑅𝑥 ) = ( 𝑅𝑌 ) ↔ ( 𝑅𝑋 ) = ( 𝑅𝑌 ) ) )
5 4 rspcev ( ( 𝑋𝐽 ∧ ( 𝑅𝑋 ) = ( 𝑅𝑌 ) ) → ∃ 𝑥𝐽 ( 𝑅𝑥 ) = ( 𝑅𝑌 ) )
6 1 2 3 elmthm ( 𝑌𝑈 ↔ ∃ 𝑥𝐽 ( 𝑅𝑥 ) = ( 𝑅𝑌 ) )
7 5 6 sylibr ( ( 𝑋𝐽 ∧ ( 𝑅𝑋 ) = ( 𝑅𝑌 ) ) → 𝑌𝑈 )