Theorem frege65a 37197

Description: A kind of Aristotelian inference. This judgement replaces the mode of inference barbara 2551 when the minor premise has a general context. Proposition 65 of [Frege1879] p. 53. (Contributed by RP, 17-Apr-2020.) (Proof modification is discouraged.)

Assertion

Ref	Expression
frege65a	⊢ (((𝜓 → 𝜒) ∧ (𝜏 → 𝜂)) → (((𝜒 → 𝜃) ∧ (𝜂 → 𝜁)) → (if-(𝜑, 𝜓, 𝜏) → if-(𝜑, 𝜃, 𝜁))))

Proof of Theorem frege65a

Step	Hyp	Ref	Expression
1		ifpimim 36873	. . 3 ⊢ (if-(𝜑, (𝜓 → 𝜒), (𝜏 → 𝜂)) → (if-(𝜑, 𝜓, 𝜏) → if-(𝜑, 𝜒, 𝜂)))
2		frege64a 37196	. . 3 ⊢ ((if-(𝜑, 𝜓, 𝜏) → if-(𝜑, 𝜒, 𝜂)) → (((𝜒 → 𝜃) ∧ (𝜂 → 𝜁)) → (if-(𝜑, 𝜓, 𝜏) → if-(𝜑, 𝜃, 𝜁))))
3	1, 2	syl 17	. 2 ⊢ (if-(𝜑, (𝜓 → 𝜒), (𝜏 → 𝜂)) → (((𝜒 → 𝜃) ∧ (𝜂 → 𝜁)) → (if-(𝜑, 𝜓, 𝜏) → if-(𝜑, 𝜃, 𝜁))))
4		frege61a 37193	. 2 ⊢ ((if-(𝜑, (𝜓 → 𝜒), (𝜏 → 𝜂)) → (((𝜒 → 𝜃) ∧ (𝜂 → 𝜁)) → (if-(𝜑, 𝜓, 𝜏) → if-(𝜑, 𝜃, 𝜁)))) → (((𝜓 → 𝜒) ∧ (𝜏 → 𝜂)) → (((𝜒 → 𝜃) ∧ (𝜂 → 𝜁)) → (if-(𝜑, 𝜓, 𝜏) → if-(𝜑, 𝜃, 𝜁)))))
5	3, 4	ax-mp 5	1 ⊢ (((𝜓 → 𝜒) ∧ (𝜏 → 𝜂)) → (((𝜒 → 𝜃) ∧ (𝜂 → 𝜁)) → (if-(𝜑, 𝜓, 𝜏) → if-(𝜑, 𝜃, 𝜁))))

Syntax hints:   → wi 4   ∧ wa 383  if-wif 1006

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-frege1 37104  ax-frege2 37105  ax-frege8 37123  ax-frege58a 37189

This theorem depends on definitions:  df-bi 196  df-or 384  df-an 385  df-ifp 1007

This theorem is referenced by:  frege66a  37198