Theorem frege58acor 41346

Description: Lemma for frege59a 41347. (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 41345	. 2 ⊢ (((𝜓 → 𝜒) ∧ (𝜃 → 𝜏)) → if-(𝜑, (𝜓 → 𝜒), (𝜃 → 𝜏)))
2		ifpimim 40986	. 2 ⊢ (if-(𝜑, (𝜓 → 𝜒), (𝜃 → 𝜏)) → (if-(𝜑, 𝜓, 𝜃) → if-(𝜑, 𝜒, 𝜏)))
3	1, 2	syl 17	1 ⊢ (((𝜓 → 𝜒) ∧ (𝜃 → 𝜏)) → (if-(𝜑, 𝜓, 𝜃) → if-(𝜑, 𝜒, 𝜏)))

Syntax hints:   → wi 4   ∧ wa 399  if-wif 1063

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

This theorem depends on definitions:  df-bi 210  df-an 400  df-or 848  df-ifp 1064

This theorem is referenced by:  frege59a  41347  frege60a  41348  frege62a  41350