Theorem eupth2lem2 29739

Description: Lemma for eupth2 29759. (Contributed by Mario Carneiro, 8-Apr-2015.)

Hypothesis

Ref	Expression
eupth2lem2.1	⊢ 𝐵 ∈ V

Assertion

Ref	Expression
eupth2lem2	⊢ ((𝐵 ≠ 𝐶 ∧ 𝐵 = 𝑈) → (¬ 𝑈 ∈ if(𝐴 = 𝐵, ∅, {𝐴, 𝐵}) ↔ 𝑈 ∈ if(𝐴 = 𝐶, ∅, {𝐴, 𝐶})))

Proof of Theorem eupth2lem2

Step	Hyp	Ref	Expression
1		eqidd 2731	. . . . . . 7 ⊢ ((𝐵 ≠ 𝐶 ∧ 𝐵 = 𝑈) → 𝐵 = 𝐵)
2	1	olcd 870	. . . . . 6 ⊢ ((𝐵 ≠ 𝐶 ∧ 𝐵 = 𝑈) → (𝐵 = 𝐴 ∨ 𝐵 = 𝐵))
3	2	biantrud 530	. . . . 5 ⊢ ((𝐵 ≠ 𝐶 ∧ 𝐵 = 𝑈) → (𝐴 ≠ 𝐵 ↔ (𝐴 ≠ 𝐵 ∧ (𝐵 = 𝐴 ∨ 𝐵 = 𝐵))))
4		eupth2lem2.1	. . . . . 6 ⊢ 𝐵 ∈ V
5		eupth2lem1 29738	. . . . . 6 ⊢ (𝐵 ∈ V → (𝐵 ∈ if(𝐴 = 𝐵, ∅, {𝐴, 𝐵}) ↔ (𝐴 ≠ 𝐵 ∧ (𝐵 = 𝐴 ∨ 𝐵 = 𝐵))))
6	4, 5	ax-mp 5	. . . . 5 ⊢ (𝐵 ∈ if(𝐴 = 𝐵, ∅, {𝐴, 𝐵}) ↔ (𝐴 ≠ 𝐵 ∧ (𝐵 = 𝐴 ∨ 𝐵 = 𝐵)))
7	3, 6	bitr4di 288	. . . 4 ⊢ ((𝐵 ≠ 𝐶 ∧ 𝐵 = 𝑈) → (𝐴 ≠ 𝐵 ↔ 𝐵 ∈ if(𝐴 = 𝐵, ∅, {𝐴, 𝐵})))
8		simpr 483	. . . . 5 ⊢ ((𝐵 ≠ 𝐶 ∧ 𝐵 = 𝑈) → 𝐵 = 𝑈)
9	8	eleq1d 2816	. . . 4 ⊢ ((𝐵 ≠ 𝐶 ∧ 𝐵 = 𝑈) → (𝐵 ∈ if(𝐴 = 𝐵, ∅, {𝐴, 𝐵}) ↔ 𝑈 ∈ if(𝐴 = 𝐵, ∅, {𝐴, 𝐵})))
10	7, 9	bitrd 278	. . 3 ⊢ ((𝐵 ≠ 𝐶 ∧ 𝐵 = 𝑈) → (𝐴 ≠ 𝐵 ↔ 𝑈 ∈ if(𝐴 = 𝐵, ∅, {𝐴, 𝐵})))
11	10	necon1bbid 2978	. 2 ⊢ ((𝐵 ≠ 𝐶 ∧ 𝐵 = 𝑈) → (¬ 𝑈 ∈ if(𝐴 = 𝐵, ∅, {𝐴, 𝐵}) ↔ 𝐴 = 𝐵))
12		simpl 481	. . . . . . 7 ⊢ ((𝐵 ≠ 𝐶 ∧ 𝐵 = 𝑈) → 𝐵 ≠ 𝐶)
13		neeq1 3001	. . . . . . 7 ⊢ (𝐵 = 𝐴 → (𝐵 ≠ 𝐶 ↔ 𝐴 ≠ 𝐶))
14	12, 13	syl5ibcom 244	. . . . . 6 ⊢ ((𝐵 ≠ 𝐶 ∧ 𝐵 = 𝑈) → (𝐵 = 𝐴 → 𝐴 ≠ 𝐶))
15	14	pm4.71rd 561	. . . . 5 ⊢ ((𝐵 ≠ 𝐶 ∧ 𝐵 = 𝑈) → (𝐵 = 𝐴 ↔ (𝐴 ≠ 𝐶 ∧ 𝐵 = 𝐴)))
16		eqcom 2737	. . . . 5 ⊢ (𝐴 = 𝐵 ↔ 𝐵 = 𝐴)
17		ancom 459	. . . . 5 ⊢ ((𝐵 = 𝐴 ∧ 𝐴 ≠ 𝐶) ↔ (𝐴 ≠ 𝐶 ∧ 𝐵 = 𝐴))
18	15, 16, 17	3bitr4g 313	. . . 4 ⊢ ((𝐵 ≠ 𝐶 ∧ 𝐵 = 𝑈) → (𝐴 = 𝐵 ↔ (𝐵 = 𝐴 ∧ 𝐴 ≠ 𝐶)))
19	12	neneqd 2943	. . . . . . 7 ⊢ ((𝐵 ≠ 𝐶 ∧ 𝐵 = 𝑈) → ¬ 𝐵 = 𝐶)
20		biorf 933	. . . . . . 7 ⊢ (¬ 𝐵 = 𝐶 → (𝐵 = 𝐴 ↔ (𝐵 = 𝐶 ∨ 𝐵 = 𝐴)))
21	19, 20	syl 17	. . . . . 6 ⊢ ((𝐵 ≠ 𝐶 ∧ 𝐵 = 𝑈) → (𝐵 = 𝐴 ↔ (𝐵 = 𝐶 ∨ 𝐵 = 𝐴)))
22		orcom 866	. . . . . 6 ⊢ ((𝐵 = 𝐶 ∨ 𝐵 = 𝐴) ↔ (𝐵 = 𝐴 ∨ 𝐵 = 𝐶))
23	21, 22	bitrdi 286	. . . . 5 ⊢ ((𝐵 ≠ 𝐶 ∧ 𝐵 = 𝑈) → (𝐵 = 𝐴 ↔ (𝐵 = 𝐴 ∨ 𝐵 = 𝐶)))
24	23	anbi1d 628	. . . 4 ⊢ ((𝐵 ≠ 𝐶 ∧ 𝐵 = 𝑈) → ((𝐵 = 𝐴 ∧ 𝐴 ≠ 𝐶) ↔ ((𝐵 = 𝐴 ∨ 𝐵 = 𝐶) ∧ 𝐴 ≠ 𝐶)))
25	18, 24	bitrd 278	. . 3 ⊢ ((𝐵 ≠ 𝐶 ∧ 𝐵 = 𝑈) → (𝐴 = 𝐵 ↔ ((𝐵 = 𝐴 ∨ 𝐵 = 𝐶) ∧ 𝐴 ≠ 𝐶)))
26		ancom 459	. . 3 ⊢ ((𝐴 ≠ 𝐶 ∧ (𝐵 = 𝐴 ∨ 𝐵 = 𝐶)) ↔ ((𝐵 = 𝐴 ∨ 𝐵 = 𝐶) ∧ 𝐴 ≠ 𝐶))
27	25, 26	bitr4di 288	. 2 ⊢ ((𝐵 ≠ 𝐶 ∧ 𝐵 = 𝑈) → (𝐴 = 𝐵 ↔ (𝐴 ≠ 𝐶 ∧ (𝐵 = 𝐴 ∨ 𝐵 = 𝐶))))
28		eupth2lem1 29738	. . . 4 ⊢ (𝐵 ∈ V → (𝐵 ∈ if(𝐴 = 𝐶, ∅, {𝐴, 𝐶}) ↔ (𝐴 ≠ 𝐶 ∧ (𝐵 = 𝐴 ∨ 𝐵 = 𝐶))))
29	4, 28	ax-mp 5	. . 3 ⊢ (𝐵 ∈ if(𝐴 = 𝐶, ∅, {𝐴, 𝐶}) ↔ (𝐴 ≠ 𝐶 ∧ (𝐵 = 𝐴 ∨ 𝐵 = 𝐶)))
30	8	eleq1d 2816	. . 3 ⊢ ((𝐵 ≠ 𝐶 ∧ 𝐵 = 𝑈) → (𝐵 ∈ if(𝐴 = 𝐶, ∅, {𝐴, 𝐶}) ↔ 𝑈 ∈ if(𝐴 = 𝐶, ∅, {𝐴, 𝐶})))
31	29, 30	bitr3id 284	. 2 ⊢ ((𝐵 ≠ 𝐶 ∧ 𝐵 = 𝑈) → ((𝐴 ≠ 𝐶 ∧ (𝐵 = 𝐴 ∨ 𝐵 = 𝐶)) ↔ 𝑈 ∈ if(𝐴 = 𝐶, ∅, {𝐴, 𝐶})))
32	11, 27, 31	3bitrd 304	1 ⊢ ((𝐵 ≠ 𝐶 ∧ 𝐵 = 𝑈) → (¬ 𝑈 ∈ if(𝐴 = 𝐵, ∅, {𝐴, 𝐵}) ↔ 𝑈 ∈ if(𝐴 = 𝐶, ∅, {𝐴, 𝐶})))

Syntax hints:  ¬ wn 3   → wi 4   ↔ wb 205   ∧ wa 394   ∨ wo 843   = wceq 1539   ∈ wcel 2104   ≠ wne 2938  Vcvv 3472  ∅c0 4321  ifcif 4527  {cpr 4629

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1795  ax-4 1809  ax-5 1911  ax-6 1969  ax-7 2009  ax-8 2106  ax-9 2114  ax-ext 2701

This theorem depends on definitions:  df-bi 206  df-an 395  df-or 844  df-tru 1542  df-fal 1552  df-ex 1780  df-sb 2066  df-clab 2708  df-cleq 2722  df-clel 2808  df-ne 2939  df-v 3474  df-dif 3950  df-un 3952  df-nul 4322  df-if 4528  df-sn 4628  df-pr 4630

This theorem is referenced by:  eupth2lem3lem4  29751