Theorem ifpim23g 44454

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

Assertion

Ref	Expression
ifpim23g	⊢ (((𝜑 → 𝜓) ↔ if-(𝜒, 𝜓, ¬ 𝜑)) ↔ (((𝜑 ∧ 𝜓) → 𝜒) ∧ (𝜒 → (𝜑 ∨ 𝜓))))

Proof of Theorem ifpim23g

Step	Hyp	Ref	Expression
1		ifpidg 44450	. 2 ⊢ (((𝜑 → 𝜓) ↔ if-(𝜒, 𝜓, ¬ 𝜑)) ↔ ((((𝜒 ∧ 𝜓) → (𝜑 → 𝜓)) ∧ ((𝜒 ∧ (𝜑 → 𝜓)) → 𝜓)) ∧ ((¬ 𝜑 → (𝜒 ∨ (𝜑 → 𝜓))) ∧ ((𝜑 → 𝜓) → (𝜒 ∨ ¬ 𝜑)))))
2		dfor2 915	. . . . 5 ⊢ ((𝜑 ∨ 𝜓) ↔ ((𝜑 → 𝜓) → 𝜓))
3	2	imbi2i 339	. . . 4 ⊢ ((𝜒 → (𝜑 ∨ 𝜓)) ↔ (𝜒 → ((𝜑 → 𝜓) → 𝜓)))
4		impexp 456	. . . 4 ⊢ (((𝜒 ∧ (𝜑 → 𝜓)) → 𝜓) ↔ (𝜒 → ((𝜑 → 𝜓) → 𝜓)))
5		ax-1 6	. . . . . 6 ⊢ (𝜓 → (𝜑 → 𝜓))
6	5	adantl 487	. . . . 5 ⊢ ((𝜒 ∧ 𝜓) → (𝜑 → 𝜓))
7	6	biantrur 540	. . . 4 ⊢ (((𝜒 ∧ (𝜑 → 𝜓)) → 𝜓) ↔ (((𝜒 ∧ 𝜓) → (𝜑 → 𝜓)) ∧ ((𝜒 ∧ (𝜑 → 𝜓)) → 𝜓)))
8	3, 4, 7	3bitr2i 302	. . 3 ⊢ ((𝜒 → (𝜑 ∨ 𝜓)) ↔ (((𝜒 ∧ 𝜓) → (𝜑 → 𝜓)) ∧ ((𝜒 ∧ (𝜑 → 𝜓)) → 𝜓)))
9		impexp 456	. . . . 5 ⊢ (((𝜑 ∧ 𝜓) → 𝜒) ↔ (𝜑 → (𝜓 → 𝜒)))
10		imdi 394	. . . . . 6 ⊢ ((𝜑 → (𝜓 → 𝜒)) ↔ ((𝜑 → 𝜓) → (𝜑 → 𝜒)))
11		imor 867	. . . . . . . 8 ⊢ ((𝜑 → 𝜒) ↔ (¬ 𝜑 ∨ 𝜒))
12		orcom 884	. . . . . . . 8 ⊢ ((¬ 𝜑 ∨ 𝜒) ↔ (𝜒 ∨ ¬ 𝜑))
13	11, 12	bitri 278	. . . . . . 7 ⊢ ((𝜑 → 𝜒) ↔ (𝜒 ∨ ¬ 𝜑))
14	13	imbi2i 339	. . . . . 6 ⊢ (((𝜑 → 𝜓) → (𝜑 → 𝜒)) ↔ ((𝜑 → 𝜓) → (𝜒 ∨ ¬ 𝜑)))
15	10, 14	bitri 278	. . . . 5 ⊢ ((𝜑 → (𝜓 → 𝜒)) ↔ ((𝜑 → 𝜓) → (𝜒 ∨ ¬ 𝜑)))
16	9, 15	bitri 278	. . . 4 ⊢ (((𝜑 ∧ 𝜓) → 𝜒) ↔ ((𝜑 → 𝜓) → (𝜒 ∨ ¬ 𝜑)))
17		pm2.21 124	. . . . . 6 ⊢ (¬ 𝜑 → (𝜑 → 𝜓))
18	17	olcd 888	. . . . 5 ⊢ (¬ 𝜑 → (𝜒 ∨ (𝜑 → 𝜓)))
19	18	biantrur 540	. . . 4 ⊢ (((𝜑 → 𝜓) → (𝜒 ∨ ¬ 𝜑)) ↔ ((¬ 𝜑 → (𝜒 ∨ (𝜑 → 𝜓))) ∧ ((𝜑 → 𝜓) → (𝜒 ∨ ¬ 𝜑))))
20	16, 19	bitri 278	. . 3 ⊢ (((𝜑 ∧ 𝜓) → 𝜒) ↔ ((¬ 𝜑 → (𝜒 ∨ (𝜑 → 𝜓))) ∧ ((𝜑 → 𝜓) → (𝜒 ∨ ¬ 𝜑))))
21	8, 20	anbi12i 640	. 2 ⊢ (((𝜒 → (𝜑 ∨ 𝜓)) ∧ ((𝜑 ∧ 𝜓) → 𝜒)) ↔ ((((𝜒 ∧ 𝜓) → (𝜑 → 𝜓)) ∧ ((𝜒 ∧ (𝜑 → 𝜓)) → 𝜓)) ∧ ((¬ 𝜑 → (𝜒 ∨ (𝜑 → 𝜓))) ∧ ((𝜑 → 𝜓) → (𝜒 ∨ ¬ 𝜑)))))
22		ancom 466	. 2 ⊢ (((𝜒 → (𝜑 ∨ 𝜓)) ∧ ((𝜑 ∧ 𝜓) → 𝜒)) ↔ (((𝜑 ∧ 𝜓) → 𝜒) ∧ (𝜒 → (𝜑 ∨ 𝜓))))
23	1, 21, 22	3bitr2i 302	1 ⊢ (((𝜑 → 𝜓) ↔ if-(𝜒, 𝜓, ¬ 𝜑)) ↔ (((𝜑 ∧ 𝜓) → 𝜒) ∧ (𝜒 → (𝜑 ∨ 𝜓))))

This proof depends on syntax axioms:  ¬ wn 3   → wi 4   ↔ wb 209   ∧ wa 401   ∨ wo 861  if-wif 1078

This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8

This proof depends on definitions:  df-bi 210  df-an 402  df-or 862  df-ifp 1079

This theorem is used by:  ifpim3  44455  ifpim4  44457