Theorem eupth2lem2 27992

Description: Lemma for eupth2 28012. (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 2822	. . . . . . 7 ⊢ ((𝐵 ≠ 𝐶 ∧ 𝐵 = 𝑈) → 𝐵 = 𝐵)
2	1	olcd 870	. . . . . 6 ⊢ ((𝐵 ≠ 𝐶 ∧ 𝐵 = 𝑈) → (𝐵 = 𝐴 ∨ 𝐵 = 𝐵))
3	2	biantrud 534	. . . . 5 ⊢ ((𝐵 ≠ 𝐶 ∧ 𝐵 = 𝑈) → (𝐴 ≠ 𝐵 ↔ (𝐴 ≠ 𝐵 ∧ (𝐵 = 𝐴 ∨ 𝐵 = 𝐵))))
4		eupth2lem2.1	. . . . . 6 ⊢ 𝐵 ∈ V
5		eupth2lem1 27991	. . . . . 6 ⊢ (𝐵 ∈ V → (𝐵 ∈ if(𝐴 = 𝐵, ∅, {𝐴, 𝐵}) ↔ (𝐴 ≠ 𝐵 ∧ (𝐵 = 𝐴 ∨ 𝐵 = 𝐵))))
6	4, 5	ax-mp 5	. . . . 5 ⊢ (𝐵 ∈ if(𝐴 = 𝐵, ∅, {𝐴, 𝐵}) ↔ (𝐴 ≠ 𝐵 ∧ (𝐵 = 𝐴 ∨ 𝐵 = 𝐵)))
7	3, 6	syl6bbr 291	. . . 4 ⊢ ((𝐵 ≠ 𝐶 ∧ 𝐵 = 𝑈) → (𝐴 ≠ 𝐵 ↔ 𝐵 ∈ if(𝐴 = 𝐵, ∅, {𝐴, 𝐵})))
8		simpr 487	. . . . 5 ⊢ ((𝐵 ≠ 𝐶 ∧ 𝐵 = 𝑈) → 𝐵 = 𝑈)
9	8	eleq1d 2897	. . . 4 ⊢ ((𝐵 ≠ 𝐶 ∧ 𝐵 = 𝑈) → (𝐵 ∈ if(𝐴 = 𝐵, ∅, {𝐴, 𝐵}) ↔ 𝑈 ∈ if(𝐴 = 𝐵, ∅, {𝐴, 𝐵})))
10	7, 9	bitrd 281	. . 3 ⊢ ((𝐵 ≠ 𝐶 ∧ 𝐵 = 𝑈) → (𝐴 ≠ 𝐵 ↔ 𝑈 ∈ if(𝐴 = 𝐵, ∅, {𝐴, 𝐵})))
11	10	necon1bbid 3055	. 2 ⊢ ((𝐵 ≠ 𝐶 ∧ 𝐵 = 𝑈) → (¬ 𝑈 ∈ if(𝐴 = 𝐵, ∅, {𝐴, 𝐵}) ↔ 𝐴 = 𝐵))
12		simpl 485	. . . . . . 7 ⊢ ((𝐵 ≠ 𝐶 ∧ 𝐵 = 𝑈) → 𝐵 ≠ 𝐶)
13		neeq1 3078	. . . . . . 7 ⊢ (𝐵 = 𝐴 → (𝐵 ≠ 𝐶 ↔ 𝐴 ≠ 𝐶))
14	12, 13	syl5ibcom 247	. . . . . 6 ⊢ ((𝐵 ≠ 𝐶 ∧ 𝐵 = 𝑈) → (𝐵 = 𝐴 → 𝐴 ≠ 𝐶))
15	14	pm4.71rd 565	. . . . 5 ⊢ ((𝐵 ≠ 𝐶 ∧ 𝐵 = 𝑈) → (𝐵 = 𝐴 ↔ (𝐴 ≠ 𝐶 ∧ 𝐵 = 𝐴)))
16		eqcom 2828	. . . . 5 ⊢ (𝐴 = 𝐵 ↔ 𝐵 = 𝐴)
17		ancom 463	. . . . 5 ⊢ ((𝐵 = 𝐴 ∧ 𝐴 ≠ 𝐶) ↔ (𝐴 ≠ 𝐶 ∧ 𝐵 = 𝐴))
18	15, 16, 17	3bitr4g 316	. . . 4 ⊢ ((𝐵 ≠ 𝐶 ∧ 𝐵 = 𝑈) → (𝐴 = 𝐵 ↔ (𝐵 = 𝐴 ∧ 𝐴 ≠ 𝐶)))
19	12	neneqd 3021	. . . . . . 7 ⊢ ((𝐵 ≠ 𝐶 ∧ 𝐵 = 𝑈) → ¬ 𝐵 = 𝐶)
20		biorf 933	. . . . . . 7 ⊢ (¬ 𝐵 = 𝐶 → (𝐵 = 𝐴 ↔ (𝐵 = 𝐶 ∨ 𝐵 = 𝐴)))
21	19, 20	syl 17	. . . . . 6 ⊢ ((𝐵 ≠ 𝐶 ∧ 𝐵 = 𝑈) → (𝐵 = 𝐴 ↔ (𝐵 = 𝐶 ∨ 𝐵 = 𝐴)))
22		orcom 866	. . . . . 6 ⊢ ((𝐵 = 𝐶 ∨ 𝐵 = 𝐴) ↔ (𝐵 = 𝐴 ∨ 𝐵 = 𝐶))
23	21, 22	syl6bb 289	. . . . 5 ⊢ ((𝐵 ≠ 𝐶 ∧ 𝐵 = 𝑈) → (𝐵 = 𝐴 ↔ (𝐵 = 𝐴 ∨ 𝐵 = 𝐶)))
24	23	anbi1d 631	. . . 4 ⊢ ((𝐵 ≠ 𝐶 ∧ 𝐵 = 𝑈) → ((𝐵 = 𝐴 ∧ 𝐴 ≠ 𝐶) ↔ ((𝐵 = 𝐴 ∨ 𝐵 = 𝐶) ∧ 𝐴 ≠ 𝐶)))
25	18, 24	bitrd 281	. . 3 ⊢ ((𝐵 ≠ 𝐶 ∧ 𝐵 = 𝑈) → (𝐴 = 𝐵 ↔ ((𝐵 = 𝐴 ∨ 𝐵 = 𝐶) ∧ 𝐴 ≠ 𝐶)))
26		ancom 463	. . 3 ⊢ ((𝐴 ≠ 𝐶 ∧ (𝐵 = 𝐴 ∨ 𝐵 = 𝐶)) ↔ ((𝐵 = 𝐴 ∨ 𝐵 = 𝐶) ∧ 𝐴 ≠ 𝐶))
27	25, 26	syl6bbr 291	. 2 ⊢ ((𝐵 ≠ 𝐶 ∧ 𝐵 = 𝑈) → (𝐴 = 𝐵 ↔ (𝐴 ≠ 𝐶 ∧ (𝐵 = 𝐴 ∨ 𝐵 = 𝐶))))
28		eupth2lem1 27991	. . . 4 ⊢ (𝐵 ∈ V → (𝐵 ∈ if(𝐴 = 𝐶, ∅, {𝐴, 𝐶}) ↔ (𝐴 ≠ 𝐶 ∧ (𝐵 = 𝐴 ∨ 𝐵 = 𝐶))))
29	4, 28	ax-mp 5	. . 3 ⊢ (𝐵 ∈ if(𝐴 = 𝐶, ∅, {𝐴, 𝐶}) ↔ (𝐴 ≠ 𝐶 ∧ (𝐵 = 𝐴 ∨ 𝐵 = 𝐶)))
30	8	eleq1d 2897	. . 3 ⊢ ((𝐵 ≠ 𝐶 ∧ 𝐵 = 𝑈) → (𝐵 ∈ if(𝐴 = 𝐶, ∅, {𝐴, 𝐶}) ↔ 𝑈 ∈ if(𝐴 = 𝐶, ∅, {𝐴, 𝐶})))
31	29, 30	syl5bbr 287	. 2 ⊢ ((𝐵 ≠ 𝐶 ∧ 𝐵 = 𝑈) → ((𝐴 ≠ 𝐶 ∧ (𝐵 = 𝐴 ∨ 𝐵 = 𝐶)) ↔ 𝑈 ∈ if(𝐴 = 𝐶, ∅, {𝐴, 𝐶})))
32	11, 27, 31	3bitrd 307	1 ⊢ ((𝐵 ≠ 𝐶 ∧ 𝐵 = 𝑈) → (¬ 𝑈 ∈ if(𝐴 = 𝐵, ∅, {𝐴, 𝐵}) ↔ 𝑈 ∈ if(𝐴 = 𝐶, ∅, {𝐴, 𝐶})))

Syntax hints:  ¬ wn 3   → wi 4   ↔ wb 208   ∧ wa 398   ∨ wo 843   = wceq 1533   ∈ wcel 2110   ≠ wne 3016  Vcvv 3495  ∅c0 4291  ifcif 4467  {cpr 4563

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1792  ax-4 1806  ax-5 1907  ax-6 1966  ax-7 2011  ax-8 2112  ax-9 2120  ax-10 2141  ax-11 2156  ax-12 2172  ax-ext 2793

This theorem depends on definitions:  df-bi 209  df-an 399  df-or 844  df-tru 1536  df-ex 1777  df-nf 1781  df-sb 2066  df-clab 2800  df-cleq 2814  df-clel 2893  df-nfc 2963  df-ne 3017  df-v 3497  df-dif 3939  df-un 3941  df-nul 4292  df-if 4468  df-sn 4562  df-pr 4564

This theorem is referenced by:  eupth2lem3lem4  28004