Theorem frege58acor 39126

Description: Lemma for frege59a 39127. (Contributed by RP, 17-Apr-2020.) (Proof modification is discouraged.)

Assertion

Ref	Expression
frege58acor	⊢ (((𝜓 → 𝜒) ∧ (𝜃 → 𝜏)) → (if-(𝜑, 𝜓, 𝜃) → if-(𝜑, 𝜒, 𝜏)))

Proof of Theorem frege58acor

Step	Hyp	Ref	Expression
1		ax-frege58a 39125	. 2 ⊢ (((𝜓 → 𝜒) ∧ (𝜃 → 𝜏)) → if-(𝜑, (𝜓 → 𝜒), (𝜃 → 𝜏)))
2		ifpimim 38812	. 2 ⊢ (if-(𝜑, (𝜓 → 𝜒), (𝜃 → 𝜏)) → (if-(𝜑, 𝜓, 𝜃) → if-(𝜑, 𝜒, 𝜏)))
3	1, 2	syl 17	1 ⊢ (((𝜓 → 𝜒) ∧ (𝜃 → 𝜏)) → (if-(𝜑, 𝜓, 𝜃) → if-(𝜑, 𝜒, 𝜏)))

Syntax hints:   → wi 4   ∧ wa 386  if-wif 1046

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-frege58a 39125

This theorem depends on definitions:  df-bi 199  df-an 387  df-or 837  df-ifp 1047

This theorem is referenced by:  frege59a  39127  frege60a  39128  frege62a  39130