Theorem bnj1098 34797

Description: First-order logic and set theory. (Contributed by Jonathan Ben-Naim, 3-Jun-2011.) (New usage is discouraged.)

Hypothesis

Ref	Expression
bnj1098.1	⊢ 𝐷 = (ω ∖ {∅})

Assertion

Ref	Expression
bnj1098	⊢ ∃𝑗((𝑖 ≠ ∅ ∧ 𝑖 ∈ 𝑛 ∧ 𝑛 ∈ 𝐷) → (𝑗 ∈ 𝑛 ∧ 𝑖 = suc 𝑗))

Distinct variable groups:   𝐷,𝑗   𝑖,𝑗   𝑗,𝑛

Allowed substitution hints:   𝐷(𝑖,𝑛)

Proof of Theorem bnj1098

Step	Hyp	Ref	Expression
1		3anrev 1101	. . . . . . 7 ⊢ ((𝑖 ≠ ∅ ∧ 𝑖 ∈ 𝑛 ∧ 𝑛 ∈ 𝐷) ↔ (𝑛 ∈ 𝐷 ∧ 𝑖 ∈ 𝑛 ∧ 𝑖 ≠ ∅))
2		df-3an 1089	. . . . . . 7 ⊢ ((𝑛 ∈ 𝐷 ∧ 𝑖 ∈ 𝑛 ∧ 𝑖 ≠ ∅) ↔ ((𝑛 ∈ 𝐷 ∧ 𝑖 ∈ 𝑛) ∧ 𝑖 ≠ ∅))
3	1, 2	bitri 275	. . . . . 6 ⊢ ((𝑖 ≠ ∅ ∧ 𝑖 ∈ 𝑛 ∧ 𝑛 ∈ 𝐷) ↔ ((𝑛 ∈ 𝐷 ∧ 𝑖 ∈ 𝑛) ∧ 𝑖 ≠ ∅))
4		simpr 484	. . . . . . . 8 ⊢ ((𝑛 ∈ 𝐷 ∧ 𝑖 ∈ 𝑛) → 𝑖 ∈ 𝑛)
5		bnj1098.1	. . . . . . . . . 10 ⊢ 𝐷 = (ω ∖ {∅})
6	5	bnj923 34782	. . . . . . . . 9 ⊢ (𝑛 ∈ 𝐷 → 𝑛 ∈ ω)
7	6	adantr 480	. . . . . . . 8 ⊢ ((𝑛 ∈ 𝐷 ∧ 𝑖 ∈ 𝑛) → 𝑛 ∈ ω)
8		elnn 7898	. . . . . . . 8 ⊢ ((𝑖 ∈ 𝑛 ∧ 𝑛 ∈ ω) → 𝑖 ∈ ω)
9	4, 7, 8	syl2anc 584	. . . . . . 7 ⊢ ((𝑛 ∈ 𝐷 ∧ 𝑖 ∈ 𝑛) → 𝑖 ∈ ω)
10	9	anim1i 615	. . . . . 6 ⊢ (((𝑛 ∈ 𝐷 ∧ 𝑖 ∈ 𝑛) ∧ 𝑖 ≠ ∅) → (𝑖 ∈ ω ∧ 𝑖 ≠ ∅))
11	3, 10	sylbi 217	. . . . 5 ⊢ ((𝑖 ≠ ∅ ∧ 𝑖 ∈ 𝑛 ∧ 𝑛 ∈ 𝐷) → (𝑖 ∈ ω ∧ 𝑖 ≠ ∅))
12		nnsuc 7905	. . . . 5 ⊢ ((𝑖 ∈ ω ∧ 𝑖 ≠ ∅) → ∃𝑗 ∈ ω 𝑖 = suc 𝑗)
13	11, 12	syl 17	. . . 4 ⊢ ((𝑖 ≠ ∅ ∧ 𝑖 ∈ 𝑛 ∧ 𝑛 ∈ 𝐷) → ∃𝑗 ∈ ω 𝑖 = suc 𝑗)
14		df-rex 3071	. . . . . 6 ⊢ (∃𝑗 ∈ ω 𝑖 = suc 𝑗 ↔ ∃𝑗(𝑗 ∈ ω ∧ 𝑖 = suc 𝑗))
15	14	imbi2i 336	. . . . 5 ⊢ (((𝑖 ≠ ∅ ∧ 𝑖 ∈ 𝑛 ∧ 𝑛 ∈ 𝐷) → ∃𝑗 ∈ ω 𝑖 = suc 𝑗) ↔ ((𝑖 ≠ ∅ ∧ 𝑖 ∈ 𝑛 ∧ 𝑛 ∈ 𝐷) → ∃𝑗(𝑗 ∈ ω ∧ 𝑖 = suc 𝑗)))
16		19.37v 1991	. . . . 5 ⊢ (∃𝑗((𝑖 ≠ ∅ ∧ 𝑖 ∈ 𝑛 ∧ 𝑛 ∈ 𝐷) → (𝑗 ∈ ω ∧ 𝑖 = suc 𝑗)) ↔ ((𝑖 ≠ ∅ ∧ 𝑖 ∈ 𝑛 ∧ 𝑛 ∈ 𝐷) → ∃𝑗(𝑗 ∈ ω ∧ 𝑖 = suc 𝑗)))
17	15, 16	bitr4i 278	. . . 4 ⊢ (((𝑖 ≠ ∅ ∧ 𝑖 ∈ 𝑛 ∧ 𝑛 ∈ 𝐷) → ∃𝑗 ∈ ω 𝑖 = suc 𝑗) ↔ ∃𝑗((𝑖 ≠ ∅ ∧ 𝑖 ∈ 𝑛 ∧ 𝑛 ∈ 𝐷) → (𝑗 ∈ ω ∧ 𝑖 = suc 𝑗)))
18	13, 17	mpbi 230	. . 3 ⊢ ∃𝑗((𝑖 ≠ ∅ ∧ 𝑖 ∈ 𝑛 ∧ 𝑛 ∈ 𝐷) → (𝑗 ∈ ω ∧ 𝑖 = suc 𝑗))
19		ancr 546	. . 3 ⊢ (((𝑖 ≠ ∅ ∧ 𝑖 ∈ 𝑛 ∧ 𝑛 ∈ 𝐷) → (𝑗 ∈ ω ∧ 𝑖 = suc 𝑗)) → ((𝑖 ≠ ∅ ∧ 𝑖 ∈ 𝑛 ∧ 𝑛 ∈ 𝐷) → ((𝑗 ∈ ω ∧ 𝑖 = suc 𝑗) ∧ (𝑖 ≠ ∅ ∧ 𝑖 ∈ 𝑛 ∧ 𝑛 ∈ 𝐷))))
20	18, 19	bnj101 34737	. 2 ⊢ ∃𝑗((𝑖 ≠ ∅ ∧ 𝑖 ∈ 𝑛 ∧ 𝑛 ∈ 𝐷) → ((𝑗 ∈ ω ∧ 𝑖 = suc 𝑗) ∧ (𝑖 ≠ ∅ ∧ 𝑖 ∈ 𝑛 ∧ 𝑛 ∈ 𝐷)))
21		vex 3484	. . . . . 6 ⊢ 𝑗 ∈ V
22	21	bnj216 34746	. . . . 5 ⊢ (𝑖 = suc 𝑗 → 𝑗 ∈ 𝑖)
23	22	ad2antlr 727	. . . 4 ⊢ (((𝑗 ∈ ω ∧ 𝑖 = suc 𝑗) ∧ (𝑖 ≠ ∅ ∧ 𝑖 ∈ 𝑛 ∧ 𝑛 ∈ 𝐷)) → 𝑗 ∈ 𝑖)
24		simpr2 1196	. . . 4 ⊢ (((𝑗 ∈ ω ∧ 𝑖 = suc 𝑗) ∧ (𝑖 ≠ ∅ ∧ 𝑖 ∈ 𝑛 ∧ 𝑛 ∈ 𝐷)) → 𝑖 ∈ 𝑛)
25		3simpc 1151	. . . . . . 7 ⊢ ((𝑖 ≠ ∅ ∧ 𝑖 ∈ 𝑛 ∧ 𝑛 ∈ 𝐷) → (𝑖 ∈ 𝑛 ∧ 𝑛 ∈ 𝐷))
26	25	ancomd 461	. . . . . 6 ⊢ ((𝑖 ≠ ∅ ∧ 𝑖 ∈ 𝑛 ∧ 𝑛 ∈ 𝐷) → (𝑛 ∈ 𝐷 ∧ 𝑖 ∈ 𝑛))
27	26	adantl 481	. . . . 5 ⊢ (((𝑗 ∈ ω ∧ 𝑖 = suc 𝑗) ∧ (𝑖 ≠ ∅ ∧ 𝑖 ∈ 𝑛 ∧ 𝑛 ∈ 𝐷)) → (𝑛 ∈ 𝐷 ∧ 𝑖 ∈ 𝑛))
28		nnord 7895	. . . . 5 ⊢ (𝑛 ∈ ω → Ord 𝑛)
29		ordtr1 6427	. . . . 5 ⊢ (Ord 𝑛 → ((𝑗 ∈ 𝑖 ∧ 𝑖 ∈ 𝑛) → 𝑗 ∈ 𝑛))
30	27, 7, 28, 29	4syl 19	. . . 4 ⊢ (((𝑗 ∈ ω ∧ 𝑖 = suc 𝑗) ∧ (𝑖 ≠ ∅ ∧ 𝑖 ∈ 𝑛 ∧ 𝑛 ∈ 𝐷)) → ((𝑗 ∈ 𝑖 ∧ 𝑖 ∈ 𝑛) → 𝑗 ∈ 𝑛))
31	23, 24, 30	mp2and 699	. . 3 ⊢ (((𝑗 ∈ ω ∧ 𝑖 = suc 𝑗) ∧ (𝑖 ≠ ∅ ∧ 𝑖 ∈ 𝑛 ∧ 𝑛 ∈ 𝐷)) → 𝑗 ∈ 𝑛)
32		simplr 769	. . 3 ⊢ (((𝑗 ∈ ω ∧ 𝑖 = suc 𝑗) ∧ (𝑖 ≠ ∅ ∧ 𝑖 ∈ 𝑛 ∧ 𝑛 ∈ 𝐷)) → 𝑖 = suc 𝑗)
33	31, 32	jca 511	. 2 ⊢ (((𝑗 ∈ ω ∧ 𝑖 = suc 𝑗) ∧ (𝑖 ≠ ∅ ∧ 𝑖 ∈ 𝑛 ∧ 𝑛 ∈ 𝐷)) → (𝑗 ∈ 𝑛 ∧ 𝑖 = suc 𝑗))
34	20, 33	bnj1023 34794	1 ⊢ ∃𝑗((𝑖 ≠ ∅ ∧ 𝑖 ∈ 𝑛 ∧ 𝑛 ∈ 𝐷) → (𝑗 ∈ 𝑛 ∧ 𝑖 = suc 𝑗))

Syntax hints:   → wi 4   ∧ wa 395   ∧ w3a 1087   = wceq 1540  ∃wex 1779   ∈ wcel 2108   ≠ wne 2940  ∃wrex 3070   ∖ cdif 3948  ∅c0 4333  {csn 4626  Ord word 6383  suc csuc 6386  ωcom 7887

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 1910  ax-6 1967  ax-7 2007  ax-8 2110  ax-9 2118  ax-ext 2708  ax-sep 5296  ax-nul 5306  ax-pr 5432  ax-un 7755

This theorem depends on definitions:  df-bi 207  df-an 396  df-or 849  df-3or 1088  df-3an 1089  df-tru 1543  df-fal 1553  df-ex 1780  df-sb 2065  df-clab 2715  df-cleq 2729  df-clel 2816  df-ne 2941  df-ral 3062  df-rex 3071  df-rab 3437  df-v 3482  df-dif 3954  df-un 3956  df-in 3958  df-ss 3968  df-pss 3971  df-nul 4334  df-if 4526  df-pw 4602  df-sn 4627  df-pr 4629  df-op 4633  df-uni 4908  df-br 5144  df-opab 5206  df-tr 5260  df-eprel 5584  df-po 5592  df-so 5593  df-fr 5637  df-we 5639  df-ord 6387  df-on 6388  df-lim 6389  df-suc 6390  df-om 7888

This theorem is referenced by:  bnj1110  34996  bnj1128  35004  bnj1145  35007