Theorem cases2ALT 1044

Description: Alternate proof of cases2 1043, not using dedlema 1041 or dedlemb 1042. (Contributed by BJ, 6-Apr-2019.) (Proof shortened by Wolf Lammen, 2-Jan-2020.) (Proof modification is discouraged.) (New usage is discouraged.)

Assertion

Ref	Expression
cases2ALT	⊢ (((𝜑 ∧ 𝜓) ∨ (¬ 𝜑 ∧ 𝜒)) ↔ ((𝜑 → 𝜓) ∧ (¬ 𝜑 → 𝜒)))

Proof of Theorem cases2ALT

Step	Hyp	Ref	Expression
1		pm3.4 809	. . . 4 ⊢ ((𝜑 ∧ 𝜓) → (𝜑 → 𝜓))
2		pm2.24 124	. . . . 5 ⊢ (𝜑 → (¬ 𝜑 → 𝜒))
3	2	adantr 484	. . . 4 ⊢ ((𝜑 ∧ 𝜓) → (¬ 𝜑 → 𝜒))
4	1, 3	jca 515	. . 3 ⊢ ((𝜑 ∧ 𝜓) → ((𝜑 → 𝜓) ∧ (¬ 𝜑 → 𝜒)))
5		pm2.21 123	. . . . 5 ⊢ (¬ 𝜑 → (𝜑 → 𝜓))
6	5	adantr 484	. . . 4 ⊢ ((¬ 𝜑 ∧ 𝜒) → (𝜑 → 𝜓))
7		pm3.4 809	. . . 4 ⊢ ((¬ 𝜑 ∧ 𝜒) → (¬ 𝜑 → 𝜒))
8	6, 7	jca 515	. . 3 ⊢ ((¬ 𝜑 ∧ 𝜒) → ((𝜑 → 𝜓) ∧ (¬ 𝜑 → 𝜒)))
9	4, 8	jaoi 854	. 2 ⊢ (((𝜑 ∧ 𝜓) ∨ (¬ 𝜑 ∧ 𝜒)) → ((𝜑 → 𝜓) ∧ (¬ 𝜑 → 𝜒)))
10		pm2.27 42	. . . . . 6 ⊢ (𝜑 → ((𝜑 → 𝜓) → 𝜓))
11	10	imdistani 572	. . . . 5 ⊢ ((𝜑 ∧ (𝜑 → 𝜓)) → (𝜑 ∧ 𝜓))
12	11	orcd 870	. . . 4 ⊢ ((𝜑 ∧ (𝜑 → 𝜓)) → ((𝜑 ∧ 𝜓) ∨ (¬ 𝜑 ∧ 𝜒)))
13	12	adantrr 716	. . 3 ⊢ ((𝜑 ∧ ((𝜑 → 𝜓) ∧ (¬ 𝜑 → 𝜒))) → ((𝜑 ∧ 𝜓) ∨ (¬ 𝜑 ∧ 𝜒)))
14		pm2.27 42	. . . . . 6 ⊢ (¬ 𝜑 → ((¬ 𝜑 → 𝜒) → 𝜒))
15	14	imdistani 572	. . . . 5 ⊢ ((¬ 𝜑 ∧ (¬ 𝜑 → 𝜒)) → (¬ 𝜑 ∧ 𝜒))
16	15	olcd 871	. . . 4 ⊢ ((¬ 𝜑 ∧ (¬ 𝜑 → 𝜒)) → ((𝜑 ∧ 𝜓) ∨ (¬ 𝜑 ∧ 𝜒)))
17	16	adantrl 715	. . 3 ⊢ ((¬ 𝜑 ∧ ((𝜑 → 𝜓) ∧ (¬ 𝜑 → 𝜒))) → ((𝜑 ∧ 𝜓) ∨ (¬ 𝜑 ∧ 𝜒)))
18	13, 17	pm2.61ian 811	. 2 ⊢ (((𝜑 → 𝜓) ∧ (¬ 𝜑 → 𝜒)) → ((𝜑 ∧ 𝜓) ∨ (¬ 𝜑 ∧ 𝜒)))
19	9, 18	impbii 212	1 ⊢ (((𝜑 ∧ 𝜓) ∨ (¬ 𝜑 ∧ 𝜒)) ↔ ((𝜑 → 𝜓) ∧ (¬ 𝜑 → 𝜒)))

Syntax hints:  ¬ wn 3   → wi 4   ↔ wb 209   ∧ wa 399   ∨ wo 844

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 210  df-an 400  df-or 845

This theorem is referenced by: (None)