Theorem ifpim1 39827

Description: Restate implication as conditional logic operator. (Contributed by RP, 20-Apr-2020.)

Assertion

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

Proof of Theorem ifpim1

Step	Hyp	Ref	Expression
1		tru 1537	. . . 4 ⊢ ⊤
2	1	olci 862	. . 3 ⊢ (¬ ¬ 𝜑 ∨ ⊤)
3	2	biantrur 533	. 2 ⊢ ((¬ 𝜑 ∨ 𝜓) ↔ ((¬ ¬ 𝜑 ∨ ⊤) ∧ (¬ 𝜑 ∨ 𝜓)))
4		imor 849	. 2 ⊢ ((𝜑 → 𝜓) ↔ (¬ 𝜑 ∨ 𝜓))
5		dfifp4 1061	. 2 ⊢ (if-(¬ 𝜑, ⊤, 𝜓) ↔ ((¬ ¬ 𝜑 ∨ ⊤) ∧ (¬ 𝜑 ∨ 𝜓)))
6	3, 4, 5	3bitr4i 305	1 ⊢ ((𝜑 → 𝜓) ↔ if-(¬ 𝜑, ⊤, 𝜓))

Syntax hints:  ¬ wn 3   → wi 4   ↔ wb 208   ∧ wa 398   ∨ wo 843  if-wif 1057  ⊤wtru 1534

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

This theorem depends on definitions:  df-bi 209  df-an 399  df-or 844  df-ifp 1058  df-tru 1536

This theorem is referenced by:  ifpdfbi  39832