Theorem frege55lem2a 38161

Description: Core proof of Proposition 55 of [Frege1879] p. 50. (Contributed by RP, 24-Dec-2019.) (Proof modification is discouraged.)

Assertion

Ref	Expression
frege55lem2a	⊢ ((𝜑 ↔ 𝜓) → if-(𝜓, 𝜑, ¬ 𝜑))

Proof of Theorem frege55lem2a

Step	Hyp	Ref	Expression
1		bicom1 211	. . 3 ⊢ ((𝜑 ↔ 𝜓) → (𝜓 ↔ 𝜑))
2		frege54cor0a 38157	. . 3 ⊢ ((𝜓 ↔ 𝜑) ↔ if-(𝜓, 𝜑, ¬ 𝜑))
3	1, 2	sylib 208	. 2 ⊢ ((𝜑 ↔ 𝜓) → if-(𝜓, 𝜑, ¬ 𝜑))
4	3	idi 2	1 ⊢ ((𝜑 ↔ 𝜓) → if-(𝜓, 𝜑, ¬ 𝜑))

Syntax hints:  ¬ wn 3   → wi 4   ↔ wb 196  if-wif 1012

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

This theorem depends on definitions:  df-bi 197  df-or 385  df-an 386  df-ifp 1013

This theorem is referenced by: (None)