Theorem en3lplem2VD 39079

Description: Virtual deduction proof of en3lplem2 8512. (Contributed by Alan Sare, 24-Oct-2011.) (Proof modification is discouraged.) (New usage is discouraged.)

Assertion

Ref	Expression
en3lplem2VD	⊢ ((𝐴 ∈ 𝐵 ∧ 𝐵 ∈ 𝐶 ∧ 𝐶 ∈ 𝐴) → (𝑥 ∈ {𝐴, 𝐵, 𝐶} → ∃𝑦(𝑦 ∈ {𝐴, 𝐵, 𝐶} ∧ 𝑦 ∈ 𝑥)))

Distinct variable groups:   𝑥,𝑦,𝐴   𝑥,𝐵,𝑦   𝑥,𝐶,𝑦

Proof of Theorem en3lplem2VD

Step	Hyp	Ref	Expression
1		idn1 38790	. . . . . . 7 ⊢ (   (𝐴 ∈ 𝐵 ∧ 𝐵 ∈ 𝐶 ∧ 𝐶 ∈ 𝐴)   ▶   (𝐴 ∈ 𝐵 ∧ 𝐵 ∈ 𝐶 ∧ 𝐶 ∈ 𝐴)   )
2		idn3 38840	. . . . . . 7 ⊢ (   (𝐴 ∈ 𝐵 ∧ 𝐵 ∈ 𝐶 ∧ 𝐶 ∈ 𝐴)   ,   𝑥 ∈ {𝐴, 𝐵, 𝐶}   ,   𝑥 = 𝐴   ▶   𝑥 = 𝐴   )
3		en3lplem1VD 39078	. . . . . . 7 ⊢ ((𝐴 ∈ 𝐵 ∧ 𝐵 ∈ 𝐶 ∧ 𝐶 ∈ 𝐴) → (𝑥 = 𝐴 → ∃𝑦(𝑦 ∈ {𝐴, 𝐵, 𝐶} ∧ 𝑦 ∈ 𝑥)))
4	1, 2, 3	e13 38975	. . . . . 6 ⊢ (   (𝐴 ∈ 𝐵 ∧ 𝐵 ∈ 𝐶 ∧ 𝐶 ∈ 𝐴)   ,   𝑥 ∈ {𝐴, 𝐵, 𝐶}   ,   𝑥 = 𝐴   ▶   ∃𝑦(𝑦 ∈ {𝐴, 𝐵, 𝐶} ∧ 𝑦 ∈ 𝑥)   )
5	4	in3 38834	. . . . 5 ⊢ (   (𝐴 ∈ 𝐵 ∧ 𝐵 ∈ 𝐶 ∧ 𝐶 ∈ 𝐴)   ,   𝑥 ∈ {𝐴, 𝐵, 𝐶}   ▶   (𝑥 = 𝐴 → ∃𝑦(𝑦 ∈ {𝐴, 𝐵, 𝐶} ∧ 𝑦 ∈ 𝑥))   )
6		3anrot 1043	. . . . . . . . 9 ⊢ ((𝐴 ∈ 𝐵 ∧ 𝐵 ∈ 𝐶 ∧ 𝐶 ∈ 𝐴) ↔ (𝐵 ∈ 𝐶 ∧ 𝐶 ∈ 𝐴 ∧ 𝐴 ∈ 𝐵))
7	1, 6	e1bi 38854	. . . . . . . 8 ⊢ (   (𝐴 ∈ 𝐵 ∧ 𝐵 ∈ 𝐶 ∧ 𝐶 ∈ 𝐴)   ▶   (𝐵 ∈ 𝐶 ∧ 𝐶 ∈ 𝐴 ∧ 𝐴 ∈ 𝐵)   )
8		idn3 38840	. . . . . . . 8 ⊢ (   (𝐴 ∈ 𝐵 ∧ 𝐵 ∈ 𝐶 ∧ 𝐶 ∈ 𝐴)   ,   𝑥 ∈ {𝐴, 𝐵, 𝐶}   ,   𝑥 = 𝐵   ▶   𝑥 = 𝐵   )
9		en3lplem1VD 39078	. . . . . . . 8 ⊢ ((𝐵 ∈ 𝐶 ∧ 𝐶 ∈ 𝐴 ∧ 𝐴 ∈ 𝐵) → (𝑥 = 𝐵 → ∃𝑦(𝑦 ∈ {𝐵, 𝐶, 𝐴} ∧ 𝑦 ∈ 𝑥)))
10	7, 8, 9	e13 38975	. . . . . . 7 ⊢ (   (𝐴 ∈ 𝐵 ∧ 𝐵 ∈ 𝐶 ∧ 𝐶 ∈ 𝐴)   ,   𝑥 ∈ {𝐴, 𝐵, 𝐶}   ,   𝑥 = 𝐵   ▶   ∃𝑦(𝑦 ∈ {𝐵, 𝐶, 𝐴} ∧ 𝑦 ∈ 𝑥)   )
11		tprot 4284	. . . . . . . . . 10 ⊢ {𝐴, 𝐵, 𝐶} = {𝐵, 𝐶, 𝐴}
12	11	eleq2i 2693	. . . . . . . . 9 ⊢ (𝑦 ∈ {𝐴, 𝐵, 𝐶} ↔ 𝑦 ∈ {𝐵, 𝐶, 𝐴})
13	12	anbi1i 731	. . . . . . . 8 ⊢ ((𝑦 ∈ {𝐴, 𝐵, 𝐶} ∧ 𝑦 ∈ 𝑥) ↔ (𝑦 ∈ {𝐵, 𝐶, 𝐴} ∧ 𝑦 ∈ 𝑥))
14	13	exbii 1774	. . . . . . 7 ⊢ (∃𝑦(𝑦 ∈ {𝐴, 𝐵, 𝐶} ∧ 𝑦 ∈ 𝑥) ↔ ∃𝑦(𝑦 ∈ {𝐵, 𝐶, 𝐴} ∧ 𝑦 ∈ 𝑥))
15	10, 14	e3bir 38966	. . . . . 6 ⊢ (   (𝐴 ∈ 𝐵 ∧ 𝐵 ∈ 𝐶 ∧ 𝐶 ∈ 𝐴)   ,   𝑥 ∈ {𝐴, 𝐵, 𝐶}   ,   𝑥 = 𝐵   ▶   ∃𝑦(𝑦 ∈ {𝐴, 𝐵, 𝐶} ∧ 𝑦 ∈ 𝑥)   )
16	15	in3 38834	. . . . 5 ⊢ (   (𝐴 ∈ 𝐵 ∧ 𝐵 ∈ 𝐶 ∧ 𝐶 ∈ 𝐴)   ,   𝑥 ∈ {𝐴, 𝐵, 𝐶}   ▶   (𝑥 = 𝐵 → ∃𝑦(𝑦 ∈ {𝐴, 𝐵, 𝐶} ∧ 𝑦 ∈ 𝑥))   )
17		jao 534	. . . . 5 ⊢ ((𝑥 = 𝐴 → ∃𝑦(𝑦 ∈ {𝐴, 𝐵, 𝐶} ∧ 𝑦 ∈ 𝑥)) → ((𝑥 = 𝐵 → ∃𝑦(𝑦 ∈ {𝐴, 𝐵, 𝐶} ∧ 𝑦 ∈ 𝑥)) → ((𝑥 = 𝐴 ∨ 𝑥 = 𝐵) → ∃𝑦(𝑦 ∈ {𝐴, 𝐵, 𝐶} ∧ 𝑦 ∈ 𝑥))))
18	5, 16, 17	e22 38896	. . . 4 ⊢ (   (𝐴 ∈ 𝐵 ∧ 𝐵 ∈ 𝐶 ∧ 𝐶 ∈ 𝐴)   ,   𝑥 ∈ {𝐴, 𝐵, 𝐶}   ▶   ((𝑥 = 𝐴 ∨ 𝑥 = 𝐵) → ∃𝑦(𝑦 ∈ {𝐴, 𝐵, 𝐶} ∧ 𝑦 ∈ 𝑥))   )
19		3anrot 1043	. . . . . . . 8 ⊢ ((𝐶 ∈ 𝐴 ∧ 𝐴 ∈ 𝐵 ∧ 𝐵 ∈ 𝐶) ↔ (𝐴 ∈ 𝐵 ∧ 𝐵 ∈ 𝐶 ∧ 𝐶 ∈ 𝐴))
20	1, 19	e1bir 38855	. . . . . . 7 ⊢ (   (𝐴 ∈ 𝐵 ∧ 𝐵 ∈ 𝐶 ∧ 𝐶 ∈ 𝐴)   ▶   (𝐶 ∈ 𝐴 ∧ 𝐴 ∈ 𝐵 ∧ 𝐵 ∈ 𝐶)   )
21		idn3 38840	. . . . . . 7 ⊢ (   (𝐴 ∈ 𝐵 ∧ 𝐵 ∈ 𝐶 ∧ 𝐶 ∈ 𝐴)   ,   𝑥 ∈ {𝐴, 𝐵, 𝐶}   ,   𝑥 = 𝐶   ▶   𝑥 = 𝐶   )
22		en3lplem1VD 39078	. . . . . . 7 ⊢ ((𝐶 ∈ 𝐴 ∧ 𝐴 ∈ 𝐵 ∧ 𝐵 ∈ 𝐶) → (𝑥 = 𝐶 → ∃𝑦(𝑦 ∈ {𝐶, 𝐴, 𝐵} ∧ 𝑦 ∈ 𝑥)))
23	20, 21, 22	e13 38975	. . . . . 6 ⊢ (   (𝐴 ∈ 𝐵 ∧ 𝐵 ∈ 𝐶 ∧ 𝐶 ∈ 𝐴)   ,   𝑥 ∈ {𝐴, 𝐵, 𝐶}   ,   𝑥 = 𝐶   ▶   ∃𝑦(𝑦 ∈ {𝐶, 𝐴, 𝐵} ∧ 𝑦 ∈ 𝑥)   )
24		tprot 4284	. . . . . . . . 9 ⊢ {𝐶, 𝐴, 𝐵} = {𝐴, 𝐵, 𝐶}
25	24	eleq2i 2693	. . . . . . . 8 ⊢ (𝑦 ∈ {𝐶, 𝐴, 𝐵} ↔ 𝑦 ∈ {𝐴, 𝐵, 𝐶})
26	25	anbi1i 731	. . . . . . 7 ⊢ ((𝑦 ∈ {𝐶, 𝐴, 𝐵} ∧ 𝑦 ∈ 𝑥) ↔ (𝑦 ∈ {𝐴, 𝐵, 𝐶} ∧ 𝑦 ∈ 𝑥))
27	26	exbii 1774	. . . . . 6 ⊢ (∃𝑦(𝑦 ∈ {𝐶, 𝐴, 𝐵} ∧ 𝑦 ∈ 𝑥) ↔ ∃𝑦(𝑦 ∈ {𝐴, 𝐵, 𝐶} ∧ 𝑦 ∈ 𝑥))
28	23, 27	e3bi 38965	. . . . 5 ⊢ (   (𝐴 ∈ 𝐵 ∧ 𝐵 ∈ 𝐶 ∧ 𝐶 ∈ 𝐴)   ,   𝑥 ∈ {𝐴, 𝐵, 𝐶}   ,   𝑥 = 𝐶   ▶   ∃𝑦(𝑦 ∈ {𝐴, 𝐵, 𝐶} ∧ 𝑦 ∈ 𝑥)   )
29	28	in3 38834	. . . 4 ⊢ (   (𝐴 ∈ 𝐵 ∧ 𝐵 ∈ 𝐶 ∧ 𝐶 ∈ 𝐴)   ,   𝑥 ∈ {𝐴, 𝐵, 𝐶}   ▶   (𝑥 = 𝐶 → ∃𝑦(𝑦 ∈ {𝐴, 𝐵, 𝐶} ∧ 𝑦 ∈ 𝑥))   )
30		idn2 38838	. . . . . . 7 ⊢ (   (𝐴 ∈ 𝐵 ∧ 𝐵 ∈ 𝐶 ∧ 𝐶 ∈ 𝐴)   ,   𝑥 ∈ {𝐴, 𝐵, 𝐶}   ▶   𝑥 ∈ {𝐴, 𝐵, 𝐶}   )
31		dftp2 4231	. . . . . . . 8 ⊢ {𝐴, 𝐵, 𝐶} = {𝑥 ∣ (𝑥 = 𝐴 ∨ 𝑥 = 𝐵 ∨ 𝑥 = 𝐶)}
32	31	eleq2i 2693	. . . . . . 7 ⊢ (𝑥 ∈ {𝐴, 𝐵, 𝐶} ↔ 𝑥 ∈ {𝑥 ∣ (𝑥 = 𝐴 ∨ 𝑥 = 𝐵 ∨ 𝑥 = 𝐶)})
33	30, 32	e2bi 38857	. . . . . 6 ⊢ (   (𝐴 ∈ 𝐵 ∧ 𝐵 ∈ 𝐶 ∧ 𝐶 ∈ 𝐴)   ,   𝑥 ∈ {𝐴, 𝐵, 𝐶}   ▶   𝑥 ∈ {𝑥 ∣ (𝑥 = 𝐴 ∨ 𝑥 = 𝐵 ∨ 𝑥 = 𝐶)}   )
34		abid 2610	. . . . . 6 ⊢ (𝑥 ∈ {𝑥 ∣ (𝑥 = 𝐴 ∨ 𝑥 = 𝐵 ∨ 𝑥 = 𝐶)} ↔ (𝑥 = 𝐴 ∨ 𝑥 = 𝐵 ∨ 𝑥 = 𝐶))
35	33, 34	e2bi 38857	. . . . 5 ⊢ (   (𝐴 ∈ 𝐵 ∧ 𝐵 ∈ 𝐶 ∧ 𝐶 ∈ 𝐴)   ,   𝑥 ∈ {𝐴, 𝐵, 𝐶}   ▶   (𝑥 = 𝐴 ∨ 𝑥 = 𝐵 ∨ 𝑥 = 𝐶)   )
36		df-3or 1038	. . . . 5 ⊢ ((𝑥 = 𝐴 ∨ 𝑥 = 𝐵 ∨ 𝑥 = 𝐶) ↔ ((𝑥 = 𝐴 ∨ 𝑥 = 𝐵) ∨ 𝑥 = 𝐶))
37	35, 36	e2bi 38857	. . . 4 ⊢ (   (𝐴 ∈ 𝐵 ∧ 𝐵 ∈ 𝐶 ∧ 𝐶 ∈ 𝐴)   ,   𝑥 ∈ {𝐴, 𝐵, 𝐶}   ▶   ((𝑥 = 𝐴 ∨ 𝑥 = 𝐵) ∨ 𝑥 = 𝐶)   )
38		jao 534	. . . 4 ⊢ (((𝑥 = 𝐴 ∨ 𝑥 = 𝐵) → ∃𝑦(𝑦 ∈ {𝐴, 𝐵, 𝐶} ∧ 𝑦 ∈ 𝑥)) → ((𝑥 = 𝐶 → ∃𝑦(𝑦 ∈ {𝐴, 𝐵, 𝐶} ∧ 𝑦 ∈ 𝑥)) → (((𝑥 = 𝐴 ∨ 𝑥 = 𝐵) ∨ 𝑥 = 𝐶) → ∃𝑦(𝑦 ∈ {𝐴, 𝐵, 𝐶} ∧ 𝑦 ∈ 𝑥))))
39	18, 29, 37, 38	e222 38861	. . 3 ⊢ (   (𝐴 ∈ 𝐵 ∧ 𝐵 ∈ 𝐶 ∧ 𝐶 ∈ 𝐴)   ,   𝑥 ∈ {𝐴, 𝐵, 𝐶}   ▶   ∃𝑦(𝑦 ∈ {𝐴, 𝐵, 𝐶} ∧ 𝑦 ∈ 𝑥)   )
40	39	in2 38830	. 2 ⊢ (   (𝐴 ∈ 𝐵 ∧ 𝐵 ∈ 𝐶 ∧ 𝐶 ∈ 𝐴)   ▶   (𝑥 ∈ {𝐴, 𝐵, 𝐶} → ∃𝑦(𝑦 ∈ {𝐴, 𝐵, 𝐶} ∧ 𝑦 ∈ 𝑥))   )
41	40	in1 38787	1 ⊢ ((𝐴 ∈ 𝐵 ∧ 𝐵 ∈ 𝐶 ∧ 𝐶 ∈ 𝐴) → (𝑥 ∈ {𝐴, 𝐵, 𝐶} → ∃𝑦(𝑦 ∈ {𝐴, 𝐵, 𝐶} ∧ 𝑦 ∈ 𝑥)))

Syntax hints:   → wi 4   ∨ wo 383   ∧ wa 384   ∨ w3o 1036   ∧ w3a 1037   = wceq 1483  ∃wex 1704   ∈ wcel 1990  {cab 2608  {ctp 4181

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1722  ax-4 1737  ax-5 1839  ax-6 1888  ax-7 1935  ax-9 1999  ax-10 2019  ax-11 2034  ax-12 2047  ax-13 2246  ax-ext 2602

This theorem depends on definitions:  df-bi 197  df-or 385  df-an 386  df-3or 1038  df-3an 1039  df-tru 1486  df-ex 1705  df-nf 1710  df-sb 1881  df-clab 2609  df-cleq 2615  df-clel 2618  df-nfc 2753  df-v 3202  df-un 3579  df-sn 4178  df-pr 4180  df-tp 4182  df-vd1 38786  df-vd2 38794  df-vd3 38806

This theorem is referenced by:  en3lpVD  39080