Metamath Proof Explorer


Theorem dfn0s2

Description: Alternate definition of the set of non-negative surreal integers. (Contributed by Scott Fenton, 17-Mar-2025)

Ref Expression
Assertion dfn0s2 ⊢ ℕ 0s = ⋂ x | 0 s ∈ x ∧ ∀ y ∈ x y + s 1 s ∈ x

Proof

Step Hyp Ref Expression
1 0no ⊢ 0 s ∈ No
2 1 elexi ⊢ 0 s ∈ V
3 2 elintab ⊢ 0 s ∈ ⋂ x | 0 s ∈ x ∧ ∀ y ∈ x y + s 1 s ∈ x ↔ ∀ x 0 s ∈ x ∧ ∀ y ∈ x y + s 1 s ∈ x → 0 s ∈ x
4 simpl ⊢ 0 s ∈ x ∧ ∀ y ∈ x y + s 1 s ∈ x → 0 s ∈ x
5 3 4 mpgbir ⊢ 0 s ∈ ⋂ x | 0 s ∈ x ∧ ∀ y ∈ x y + s 1 s ∈ x
6 oveq1 ⊢ y = z → y + s 1 s = z + s 1 s
7 6 eleq1d ⊢ y = z → y + s 1 s ∈ x ↔ z + s 1 s ∈ x
8 7 rspccv ⊢ ∀ y ∈ x y + s 1 s ∈ x → z ∈ x → z + s 1 s ∈ x
9 8 adantl ⊢ 0 s ∈ x ∧ ∀ y ∈ x y + s 1 s ∈ x → z ∈ x → z + s 1 s ∈ x
10 9 a2i ⊢ 0 s ∈ x ∧ ∀ y ∈ x y + s 1 s ∈ x → z ∈ x → 0 s ∈ x ∧ ∀ y ∈ x y + s 1 s ∈ x → z + s 1 s ∈ x
11 10 alimi ⊢ ∀ x 0 s ∈ x ∧ ∀ y ∈ x y + s 1 s ∈ x → z ∈ x → ∀ x 0 s ∈ x ∧ ∀ y ∈ x y + s 1 s ∈ x → z + s 1 s ∈ x
12 vex ⊢ z ∈ V
13 12 elintab ⊢ z ∈ ⋂ x | 0 s ∈ x ∧ ∀ y ∈ x y + s 1 s ∈ x ↔ ∀ x 0 s ∈ x ∧ ∀ y ∈ x y + s 1 s ∈ x → z ∈ x
14 ovex ⊢ z + s 1 s ∈ V
15 14 elintab ⊢ z + s 1 s ∈ ⋂ x | 0 s ∈ x ∧ ∀ y ∈ x y + s 1 s ∈ x ↔ ∀ x 0 s ∈ x ∧ ∀ y ∈ x y + s 1 s ∈ x → z + s 1 s ∈ x
16 11 13 15 3imtr4i ⊢ z ∈ ⋂ x | 0 s ∈ x ∧ ∀ y ∈ x y + s 1 s ∈ x → z + s 1 s ∈ ⋂ x | 0 s ∈ x ∧ ∀ y ∈ x y + s 1 s ∈ x
17 16 rgen ⊢ ∀ z ∈ ⋂ x | 0 s ∈ x ∧ ∀ y ∈ x y + s 1 s ∈ x z + s 1 s ∈ ⋂ x | 0 s ∈ x ∧ ∀ y ∈ x y + s 1 s ∈ x
18 peano5n0s ⊢ 0 s ∈ ⋂ x | 0 s ∈ x ∧ ∀ y ∈ x y + s 1 s ∈ x ∧ ∀ z ∈ ⋂ x | 0 s ∈ x ∧ ∀ y ∈ x y + s 1 s ∈ x z + s 1 s ∈ ⋂ x | 0 s ∈ x ∧ ∀ y ∈ x y + s 1 s ∈ x → ℕ 0s ⊆ ⋂ x | 0 s ∈ x ∧ ∀ y ∈ x y + s 1 s ∈ x
19 5 17 18 mp2an ⊢ ℕ 0s ⊆ ⋂ x | 0 s ∈ x ∧ ∀ y ∈ x y + s 1 s ∈ x
20 0n0s ⊢ 0 s ∈ ℕ 0s
21 peano2n0s ⊢ y ∈ ℕ 0s → y + s 1 s ∈ ℕ 0s
22 21 rgen ⊢ ∀ y ∈ ℕ 0s y + s 1 s ∈ ℕ 0s
23 n0sex ⊢ ℕ 0s ∈ V
24 eleq2 ⊢ x = ℕ 0s → 0 s ∈ x ↔ 0 s ∈ ℕ 0s
25 eleq2 ⊢ x = ℕ 0s → y + s 1 s ∈ x ↔ y + s 1 s ∈ ℕ 0s
26 25 raleqbi1dv ⊢ x = ℕ 0s → ∀ y ∈ x y + s 1 s ∈ x ↔ ∀ y ∈ ℕ 0s y + s 1 s ∈ ℕ 0s
27 24 26 anbi12d ⊢ x = ℕ 0s → 0 s ∈ x ∧ ∀ y ∈ x y + s 1 s ∈ x ↔ 0 s ∈ ℕ 0s ∧ ∀ y ∈ ℕ 0s y + s 1 s ∈ ℕ 0s
28 23 27 elab ⊢ ℕ 0s ∈ x | 0 s ∈ x ∧ ∀ y ∈ x y + s 1 s ∈ x ↔ 0 s ∈ ℕ 0s ∧ ∀ y ∈ ℕ 0s y + s 1 s ∈ ℕ 0s
29 20 22 28 mpbir2an ⊢ ℕ 0s ∈ x | 0 s ∈ x ∧ ∀ y ∈ x y + s 1 s ∈ x
30 intss1 ⊢ ℕ 0s ∈ x | 0 s ∈ x ∧ ∀ y ∈ x y + s 1 s ∈ x → ⋂ x | 0 s ∈ x ∧ ∀ y ∈ x y + s 1 s ∈ x ⊆ ℕ 0s
31 29 30 ax-mp ⊢ ⋂ x | 0 s ∈ x ∧ ∀ y ∈ x y + s 1 s ∈ x ⊆ ℕ 0s
32 19 31 eqssi ⊢ ℕ 0s = ⋂ x | 0 s ∈ x ∧ ∀ y ∈ x y + s 1 s ∈ x