ILE Home Intuitionistic Logic Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  ILE Home  >  Th. List  >  frecfzennn GIF version

Theorem frecfzennn 10428
Description: The cardinality of a finite set of sequential integers. (See frec2uz0d 10401 for a description of the hypothesis.) (Contributed by Jim Kingdon, 18-May-2020.)
Hypothesis
Ref Expression
frecfzennn.1 𝐺 = frec((𝑥 ∈ ℤ ↦ (𝑥 + 1)), 0)
Assertion
Ref Expression
frecfzennn (𝑁 ∈ ℕ0 → (1...𝑁) ≈ (𝐺𝑁))

Proof of Theorem frecfzennn
Dummy variables 𝑚 𝑛 𝑧 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 oveq2 5885 . . 3 (𝑛 = 0 → (1...𝑛) = (1...0))
2 fveq2 5517 . . 3 (𝑛 = 0 → (𝐺𝑛) = (𝐺‘0))
31, 2breq12d 4018 . 2 (𝑛 = 0 → ((1...𝑛) ≈ (𝐺𝑛) ↔ (1...0) ≈ (𝐺‘0)))
4 oveq2 5885 . . 3 (𝑛 = 𝑚 → (1...𝑛) = (1...𝑚))
5 fveq2 5517 . . 3 (𝑛 = 𝑚 → (𝐺𝑛) = (𝐺𝑚))
64, 5breq12d 4018 . 2 (𝑛 = 𝑚 → ((1...𝑛) ≈ (𝐺𝑛) ↔ (1...𝑚) ≈ (𝐺𝑚)))
7 oveq2 5885 . . 3 (𝑛 = (𝑚 + 1) → (1...𝑛) = (1...(𝑚 + 1)))
8 fveq2 5517 . . 3 (𝑛 = (𝑚 + 1) → (𝐺𝑛) = (𝐺‘(𝑚 + 1)))
97, 8breq12d 4018 . 2 (𝑛 = (𝑚 + 1) → ((1...𝑛) ≈ (𝐺𝑛) ↔ (1...(𝑚 + 1)) ≈ (𝐺‘(𝑚 + 1))))
10 oveq2 5885 . . 3 (𝑛 = 𝑁 → (1...𝑛) = (1...𝑁))
11 fveq2 5517 . . 3 (𝑛 = 𝑁 → (𝐺𝑛) = (𝐺𝑁))
1210, 11breq12d 4018 . 2 (𝑛 = 𝑁 → ((1...𝑛) ≈ (𝐺𝑛) ↔ (1...𝑁) ≈ (𝐺𝑁)))
13 0ex 4132 . . . 4 ∅ ∈ V
1413enref 6767 . . 3 ∅ ≈ ∅
15 fz10 10048 . . 3 (1...0) = ∅
16 0zd 9267 . . . . . . 7 (⊤ → 0 ∈ ℤ)
17 frecfzennn.1 . . . . . . 7 𝐺 = frec((𝑥 ∈ ℤ ↦ (𝑥 + 1)), 0)
1816, 17frec2uzf1od 10408 . . . . . 6 (⊤ → 𝐺:ω–1-1-onto→(ℤ‘0))
1918mptru 1362 . . . . 5 𝐺:ω–1-1-onto→(ℤ‘0)
20 peano1 4595 . . . . 5 ∅ ∈ ω
2119, 20pm3.2i 272 . . . 4 (𝐺:ω–1-1-onto→(ℤ‘0) ∧ ∅ ∈ ω)
2216, 17frec2uz0d 10401 . . . . 5 (⊤ → (𝐺‘∅) = 0)
2322mptru 1362 . . . 4 (𝐺‘∅) = 0
24 f1ocnvfv 5782 . . . 4 ((𝐺:ω–1-1-onto→(ℤ‘0) ∧ ∅ ∈ ω) → ((𝐺‘∅) = 0 → (𝐺‘0) = ∅))
2521, 23, 24mp2 16 . . 3 (𝐺‘0) = ∅
2614, 15, 253brtr4i 4035 . 2 (1...0) ≈ (𝐺‘0)
27 simpr 110 . . . . 5 ((𝑚 ∈ ℕ0 ∧ (1...𝑚) ≈ (𝐺𝑚)) → (1...𝑚) ≈ (𝐺𝑚))
28 peano2nn0 9218 . . . . . . 7 (𝑚 ∈ ℕ0 → (𝑚 + 1) ∈ ℕ0)
29 zex 9264 . . . . . . . . . . . . . . 15 ℤ ∈ V
3029mptex 5744 . . . . . . . . . . . . . 14 (𝑥 ∈ ℤ ↦ (𝑥 + 1)) ∈ V
31 vex 2742 . . . . . . . . . . . . . 14 𝑧 ∈ V
3230, 31fvex 5537 . . . . . . . . . . . . 13 ((𝑥 ∈ ℤ ↦ (𝑥 + 1))‘𝑧) ∈ V
3332ax-gen 1449 . . . . . . . . . . . 12 𝑧((𝑥 ∈ ℤ ↦ (𝑥 + 1))‘𝑧) ∈ V
34 0z 9266 . . . . . . . . . . . 12 0 ∈ ℤ
35 frecfnom 6404 . . . . . . . . . . . 12 ((∀𝑧((𝑥 ∈ ℤ ↦ (𝑥 + 1))‘𝑧) ∈ V ∧ 0 ∈ ℤ) → frec((𝑥 ∈ ℤ ↦ (𝑥 + 1)), 0) Fn ω)
3633, 34, 35mp2an 426 . . . . . . . . . . 11 frec((𝑥 ∈ ℤ ↦ (𝑥 + 1)), 0) Fn ω
3717fneq1i 5312 . . . . . . . . . . 11 (𝐺 Fn ω ↔ frec((𝑥 ∈ ℤ ↦ (𝑥 + 1)), 0) Fn ω)
3836, 37mpbir 146 . . . . . . . . . 10 𝐺 Fn ω
39 omex 4594 . . . . . . . . . 10 ω ∈ V
40 fnex 5740 . . . . . . . . . 10 ((𝐺 Fn ω ∧ ω ∈ V) → 𝐺 ∈ V)
4138, 39, 40mp2an 426 . . . . . . . . 9 𝐺 ∈ V
4241cnvex 5169 . . . . . . . 8 𝐺 ∈ V
43 vex 2742 . . . . . . . 8 𝑚 ∈ V
4442, 43fvex 5537 . . . . . . 7 (𝐺𝑚) ∈ V
45 en2sn 6815 . . . . . . 7 (((𝑚 + 1) ∈ ℕ0 ∧ (𝐺𝑚) ∈ V) → {(𝑚 + 1)} ≈ {(𝐺𝑚)})
4628, 44, 45sylancl 413 . . . . . 6 (𝑚 ∈ ℕ0 → {(𝑚 + 1)} ≈ {(𝐺𝑚)})
4746adantr 276 . . . . 5 ((𝑚 ∈ ℕ0 ∧ (1...𝑚) ≈ (𝐺𝑚)) → {(𝑚 + 1)} ≈ {(𝐺𝑚)})
48 fzp1disj 10082 . . . . . 6 ((1...𝑚) ∩ {(𝑚 + 1)}) = ∅
4948a1i 9 . . . . 5 ((𝑚 ∈ ℕ0 ∧ (1...𝑚) ≈ (𝐺𝑚)) → ((1...𝑚) ∩ {(𝑚 + 1)}) = ∅)
50 f1ocnvdm 5784 . . . . . . . . . 10 ((𝐺:ω–1-1-onto→(ℤ‘0) ∧ 𝑚 ∈ (ℤ‘0)) → (𝐺𝑚) ∈ ω)
5119, 50mpan 424 . . . . . . . . 9 (𝑚 ∈ (ℤ‘0) → (𝐺𝑚) ∈ ω)
52 nn0uz 9564 . . . . . . . . 9 0 = (ℤ‘0)
5351, 52eleq2s 2272 . . . . . . . 8 (𝑚 ∈ ℕ0 → (𝐺𝑚) ∈ ω)
54 nnord 4613 . . . . . . . 8 ((𝐺𝑚) ∈ ω → Ord (𝐺𝑚))
55 ordirr 4543 . . . . . . . 8 (Ord (𝐺𝑚) → ¬ (𝐺𝑚) ∈ (𝐺𝑚))
5653, 54, 553syl 17 . . . . . . 7 (𝑚 ∈ ℕ0 → ¬ (𝐺𝑚) ∈ (𝐺𝑚))
5756adantr 276 . . . . . 6 ((𝑚 ∈ ℕ0 ∧ (1...𝑚) ≈ (𝐺𝑚)) → ¬ (𝐺𝑚) ∈ (𝐺𝑚))
58 disjsn 3656 . . . . . 6 (((𝐺𝑚) ∩ {(𝐺𝑚)}) = ∅ ↔ ¬ (𝐺𝑚) ∈ (𝐺𝑚))
5957, 58sylibr 134 . . . . 5 ((𝑚 ∈ ℕ0 ∧ (1...𝑚) ≈ (𝐺𝑚)) → ((𝐺𝑚) ∩ {(𝐺𝑚)}) = ∅)
60 unen 6818 . . . . 5 ((((1...𝑚) ≈ (𝐺𝑚) ∧ {(𝑚 + 1)} ≈ {(𝐺𝑚)}) ∧ (((1...𝑚) ∩ {(𝑚 + 1)}) = ∅ ∧ ((𝐺𝑚) ∩ {(𝐺𝑚)}) = ∅)) → ((1...𝑚) ∪ {(𝑚 + 1)}) ≈ ((𝐺𝑚) ∪ {(𝐺𝑚)}))
6127, 47, 49, 59, 60syl22anc 1239 . . . 4 ((𝑚 ∈ ℕ0 ∧ (1...𝑚) ≈ (𝐺𝑚)) → ((1...𝑚) ∪ {(𝑚 + 1)}) ≈ ((𝐺𝑚) ∪ {(𝐺𝑚)}))
62 1z 9281 . . . . . 6 1 ∈ ℤ
63 1m1e0 8990 . . . . . . . . . 10 (1 − 1) = 0
6463fveq2i 5520 . . . . . . . . 9 (ℤ‘(1 − 1)) = (ℤ‘0)
6552, 64eqtr4i 2201 . . . . . . . 8 0 = (ℤ‘(1 − 1))
6665eleq2i 2244 . . . . . . 7 (𝑚 ∈ ℕ0𝑚 ∈ (ℤ‘(1 − 1)))
6766biimpi 120 . . . . . 6 (𝑚 ∈ ℕ0𝑚 ∈ (ℤ‘(1 − 1)))
68 fzsuc2 10081 . . . . . 6 ((1 ∈ ℤ ∧ 𝑚 ∈ (ℤ‘(1 − 1))) → (1...(𝑚 + 1)) = ((1...𝑚) ∪ {(𝑚 + 1)}))
6962, 67, 68sylancr 414 . . . . 5 (𝑚 ∈ ℕ0 → (1...(𝑚 + 1)) = ((1...𝑚) ∪ {(𝑚 + 1)}))
7069adantr 276 . . . 4 ((𝑚 ∈ ℕ0 ∧ (1...𝑚) ≈ (𝐺𝑚)) → (1...(𝑚 + 1)) = ((1...𝑚) ∪ {(𝑚 + 1)}))
71 peano2 4596 . . . . . . . . 9 ((𝐺𝑚) ∈ ω → suc (𝐺𝑚) ∈ ω)
7253, 71syl 14 . . . . . . . 8 (𝑚 ∈ ℕ0 → suc (𝐺𝑚) ∈ ω)
7372, 19jctil 312 . . . . . . 7 (𝑚 ∈ ℕ0 → (𝐺:ω–1-1-onto→(ℤ‘0) ∧ suc (𝐺𝑚) ∈ ω))
74 0zd 9267 . . . . . . . . . 10 ((𝐺𝑚) ∈ ω → 0 ∈ ℤ)
75 id 19 . . . . . . . . . 10 ((𝐺𝑚) ∈ ω → (𝐺𝑚) ∈ ω)
7674, 17, 75frec2uzsucd 10403 . . . . . . . . 9 ((𝐺𝑚) ∈ ω → (𝐺‘suc (𝐺𝑚)) = ((𝐺‘(𝐺𝑚)) + 1))
7753, 76syl 14 . . . . . . . 8 (𝑚 ∈ ℕ0 → (𝐺‘suc (𝐺𝑚)) = ((𝐺‘(𝐺𝑚)) + 1))
7852eleq2i 2244 . . . . . . . . . . 11 (𝑚 ∈ ℕ0𝑚 ∈ (ℤ‘0))
7978biimpi 120 . . . . . . . . . 10 (𝑚 ∈ ℕ0𝑚 ∈ (ℤ‘0))
80 f1ocnvfv2 5781 . . . . . . . . . 10 ((𝐺:ω–1-1-onto→(ℤ‘0) ∧ 𝑚 ∈ (ℤ‘0)) → (𝐺‘(𝐺𝑚)) = 𝑚)
8119, 79, 80sylancr 414 . . . . . . . . 9 (𝑚 ∈ ℕ0 → (𝐺‘(𝐺𝑚)) = 𝑚)
8281oveq1d 5892 . . . . . . . 8 (𝑚 ∈ ℕ0 → ((𝐺‘(𝐺𝑚)) + 1) = (𝑚 + 1))
8377, 82eqtrd 2210 . . . . . . 7 (𝑚 ∈ ℕ0 → (𝐺‘suc (𝐺𝑚)) = (𝑚 + 1))
84 f1ocnvfv 5782 . . . . . . 7 ((𝐺:ω–1-1-onto→(ℤ‘0) ∧ suc (𝐺𝑚) ∈ ω) → ((𝐺‘suc (𝐺𝑚)) = (𝑚 + 1) → (𝐺‘(𝑚 + 1)) = suc (𝐺𝑚)))
8573, 83, 84sylc 62 . . . . . 6 (𝑚 ∈ ℕ0 → (𝐺‘(𝑚 + 1)) = suc (𝐺𝑚))
8685adantr 276 . . . . 5 ((𝑚 ∈ ℕ0 ∧ (1...𝑚) ≈ (𝐺𝑚)) → (𝐺‘(𝑚 + 1)) = suc (𝐺𝑚))
87 df-suc 4373 . . . . 5 suc (𝐺𝑚) = ((𝐺𝑚) ∪ {(𝐺𝑚)})
8886, 87eqtrdi 2226 . . . 4 ((𝑚 ∈ ℕ0 ∧ (1...𝑚) ≈ (𝐺𝑚)) → (𝐺‘(𝑚 + 1)) = ((𝐺𝑚) ∪ {(𝐺𝑚)}))
8961, 70, 883brtr4d 4037 . . 3 ((𝑚 ∈ ℕ0 ∧ (1...𝑚) ≈ (𝐺𝑚)) → (1...(𝑚 + 1)) ≈ (𝐺‘(𝑚 + 1)))
9089ex 115 . 2 (𝑚 ∈ ℕ0 → ((1...𝑚) ≈ (𝐺𝑚) → (1...(𝑚 + 1)) ≈ (𝐺‘(𝑚 + 1))))
913, 6, 9, 12, 26, 90nn0ind 9369 1 (𝑁 ∈ ℕ0 → (1...𝑁) ≈ (𝐺𝑁))
Colors of variables: wff set class
Syntax hints:  ¬ wn 3  wi 4  wa 104  wal 1351   = wceq 1353  wtru 1354  wcel 2148  Vcvv 2739  cun 3129  cin 3130  c0 3424  {csn 3594   class class class wbr 4005  cmpt 4066  Ord word 4364  suc csuc 4367  ωcom 4591  ccnv 4627   Fn wfn 5213  1-1-ontowf1o 5217  cfv 5218  (class class class)co 5877  freccfrec 6393  cen 6740  0cc0 7813  1c1 7814   + caddc 7816  cmin 8130  0cn0 9178  cz 9255  cuz 9530  ...cfz 10010
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-ia1 106  ax-ia2 107  ax-ia3 108  ax-in1 614  ax-in2 615  ax-io 709  ax-5 1447  ax-7 1448  ax-gen 1449  ax-ie1 1493  ax-ie2 1494  ax-8 1504  ax-10 1505  ax-11 1506  ax-i12 1507  ax-bndl 1509  ax-4 1510  ax-17 1526  ax-i9 1530  ax-ial 1534  ax-i5r 1535  ax-13 2150  ax-14 2151  ax-ext 2159  ax-coll 4120  ax-sep 4123  ax-nul 4131  ax-pow 4176  ax-pr 4211  ax-un 4435  ax-setind 4538  ax-iinf 4589  ax-cnex 7904  ax-resscn 7905  ax-1cn 7906  ax-1re 7907  ax-icn 7908  ax-addcl 7909  ax-addrcl 7910  ax-mulcl 7911  ax-addcom 7913  ax-addass 7915  ax-distr 7917  ax-i2m1 7918  ax-0lt1 7919  ax-0id 7921  ax-rnegex 7922  ax-cnre 7924  ax-pre-ltirr 7925  ax-pre-ltwlin 7926  ax-pre-lttrn 7927  ax-pre-apti 7928  ax-pre-ltadd 7929
This theorem depends on definitions:  df-bi 117  df-3or 979  df-3an 980  df-tru 1356  df-fal 1359  df-nf 1461  df-sb 1763  df-eu 2029  df-mo 2030  df-clab 2164  df-cleq 2170  df-clel 2173  df-nfc 2308  df-ne 2348  df-nel 2443  df-ral 2460  df-rex 2461  df-reu 2462  df-rab 2464  df-v 2741  df-sbc 2965  df-csb 3060  df-dif 3133  df-un 3135  df-in 3137  df-ss 3144  df-nul 3425  df-pw 3579  df-sn 3600  df-pr 3601  df-op 3603  df-uni 3812  df-int 3847  df-iun 3890  df-br 4006  df-opab 4067  df-mpt 4068  df-tr 4104  df-id 4295  df-iord 4368  df-on 4370  df-ilim 4371  df-suc 4373  df-iom 4592  df-xp 4634  df-rel 4635  df-cnv 4636  df-co 4637  df-dm 4638  df-rn 4639  df-res 4640  df-ima 4641  df-iota 5180  df-fun 5220  df-fn 5221  df-f 5222  df-f1 5223  df-fo 5224  df-f1o 5225  df-fv 5226  df-riota 5833  df-ov 5880  df-oprab 5881  df-mpo 5882  df-recs 6308  df-frec 6394  df-1o 6419  df-er 6537  df-en 6743  df-pnf 7996  df-mnf 7997  df-xr 7998  df-ltxr 7999  df-le 8000  df-sub 8132  df-neg 8133  df-inn 8922  df-n0 9179  df-z 9256  df-uz 9531  df-fz 10011
This theorem is referenced by:  frecfzen2  10429  hashfz1  10765
  Copyright terms: Public domain W3C validator