Theorem iswrdi 14468

Description: A zero-based sequence is a word. (Contributed by Stefan O'Rear, 15-Aug-2015.) (Revised by Mario Carneiro, 26-Feb-2016.)

Assertion

Ref	Expression
iswrdi	⊢ (𝑊:(0..^𝐿)⟶𝑆 → 𝑊 ∈ Word 𝑆)

Proof of Theorem iswrdi

Dummy variable 𝑙 is distinct from all other variables.

Step	Hyp	Ref	Expression
1		oveq2 7366	. . . . 5 ⊢ (𝑙 = 𝐿 → (0..^𝑙) = (0..^𝐿))
2	1	feq2d 6644	. . . 4 ⊢ (𝑙 = 𝐿 → (𝑊:(0..^𝑙)⟶𝑆 ↔ 𝑊:(0..^𝐿)⟶𝑆))
3	2	rspcev 3565	. . 3 ⊢ ((𝐿 ∈ ℕ0 ∧ 𝑊:(0..^𝐿)⟶𝑆) → ∃𝑙 ∈ ℕ0 𝑊:(0..^𝑙)⟶𝑆)
4		0nn0 12441	. . . 4 ⊢ 0 ∈ ℕ0
5		fzo0n0 13660	. . . . . . . . 9 ⊢ ((0..^𝐿) ≠ ∅ ↔ 𝐿 ∈ ℕ)
6		nnnn0 12433	. . . . . . . . 9 ⊢ (𝐿 ∈ ℕ → 𝐿 ∈ ℕ0)
7	5, 6	sylbi 217	. . . . . . . 8 ⊢ ((0..^𝐿) ≠ ∅ → 𝐿 ∈ ℕ0)
8	7	necon1bi 2961	. . . . . . 7 ⊢ (¬ 𝐿 ∈ ℕ0 → (0..^𝐿) = ∅)
9		fzo0 13627	. . . . . . 7 ⊢ (0..^0) = ∅
10	8, 9	eqtr4di 2790	. . . . . 6 ⊢ (¬ 𝐿 ∈ ℕ0 → (0..^𝐿) = (0..^0))
11	10	feq2d 6644	. . . . 5 ⊢ (¬ 𝐿 ∈ ℕ0 → (𝑊:(0..^𝐿)⟶𝑆 ↔ 𝑊:(0..^0)⟶𝑆))
12	11	biimpa 476	. . . 4 ⊢ ((¬ 𝐿 ∈ ℕ0 ∧ 𝑊:(0..^𝐿)⟶𝑆) → 𝑊:(0..^0)⟶𝑆)
13		oveq2 7366	. . . . . 6 ⊢ (𝑙 = 0 → (0..^𝑙) = (0..^0))
14	13	feq2d 6644	. . . . 5 ⊢ (𝑙 = 0 → (𝑊:(0..^𝑙)⟶𝑆 ↔ 𝑊:(0..^0)⟶𝑆))
15	14	rspcev 3565	. . . 4 ⊢ ((0 ∈ ℕ0 ∧ 𝑊:(0..^0)⟶𝑆) → ∃𝑙 ∈ ℕ0 𝑊:(0..^𝑙)⟶𝑆)
16	4, 12, 15	sylancr 588	. . 3 ⊢ ((¬ 𝐿 ∈ ℕ0 ∧ 𝑊:(0..^𝐿)⟶𝑆) → ∃𝑙 ∈ ℕ0 𝑊:(0..^𝑙)⟶𝑆)
17	3, 16	pm2.61ian 812	. 2 ⊢ (𝑊:(0..^𝐿)⟶𝑆 → ∃𝑙 ∈ ℕ0 𝑊:(0..^𝑙)⟶𝑆)
18		iswrd 14466	. 2 ⊢ (𝑊 ∈ Word 𝑆 ↔ ∃𝑙 ∈ ℕ0 𝑊:(0..^𝑙)⟶𝑆)
19	17, 18	sylibr 234	1 ⊢ (𝑊:(0..^𝐿)⟶𝑆 → 𝑊 ∈ Word 𝑆)

Syntax hints:  ¬ wn 3   → wi 4   ∧ wa 395   = wceq 1542   ∈ wcel 2114   ≠ wne 2933  ∃wrex 3062  ∅c0 4274  ⟶wf 6486  (class class class)co 7358  0cc0 11027  ℕcn 12163  ℕ₀cn0 12426  ..^cfzo 13597  Word cword 14464

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1797  ax-4 1811  ax-5 1912  ax-6 1969  ax-7 2010  ax-8 2116  ax-9 2124  ax-10 2147  ax-11 2163  ax-12 2185  ax-ext 2709  ax-rep 5212  ax-sep 5231  ax-nul 5241  ax-pow 5300  ax-pr 5368  ax-un 7680  ax-cnex 11083  ax-resscn 11084  ax-1cn 11085  ax-icn 11086  ax-addcl 11087  ax-addrcl 11088  ax-mulcl 11089  ax-mulrcl 11090  ax-mulcom 11091  ax-addass 11092  ax-mulass 11093  ax-distr 11094  ax-i2m1 11095  ax-1ne0 11096  ax-1rid 11097  ax-rnegex 11098  ax-rrecex 11099  ax-cnre 11100  ax-pre-lttri 11101  ax-pre-lttrn 11102  ax-pre-ltadd 11103  ax-pre-mulgt0 11104

This theorem depends on definitions:  df-bi 207  df-an 396  df-or 849  df-3or 1088  df-3an 1089  df-tru 1545  df-fal 1555  df-ex 1782  df-nf 1786  df-sb 2069  df-mo 2540  df-eu 2570  df-clab 2716  df-cleq 2729  df-clel 2812  df-nfc 2886  df-ne 2934  df-nel 3038  df-ral 3053  df-rex 3063  df-reu 3344  df-rab 3391  df-v 3432  df-sbc 3730  df-csb 3839  df-dif 3893  df-un 3895  df-in 3897  df-ss 3907  df-pss 3910  df-nul 4275  df-if 4468  df-pw 4544  df-sn 4569  df-pr 4571  df-op 4575  df-uni 4852  df-iun 4936  df-br 5087  df-opab 5149  df-mpt 5168  df-tr 5194  df-id 5517  df-eprel 5522  df-po 5530  df-so 5531  df-fr 5575  df-we 5577  df-xp 5628  df-rel 5629  df-cnv 5630  df-co 5631  df-dm 5632  df-rn 5633  df-res 5634  df-ima 5635  df-pred 6257  df-ord 6318  df-on 6319  df-lim 6320  df-suc 6321  df-iota 6446  df-fun 6492  df-fn 6493  df-f 6494  df-f1 6495  df-fo 6496  df-f1o 6497  df-fv 6498  df-riota 7315  df-ov 7361  df-oprab 7362  df-mpo 7363  df-om 7809  df-1st 7933  df-2nd 7934  df-frecs 8222  df-wrecs 8253  df-recs 8302  df-rdg 8340  df-er 8634  df-en 8885  df-dom 8886  df-sdom 8887  df-pnf 11170  df-mnf 11171  df-xr 11172  df-ltxr 11173  df-le 11174  df-sub 11368  df-neg 11369  df-nn 12164  df-n0 12427  df-z 12514  df-uz 12778  df-fz 13451  df-fzo 13598  df-word 14465

This theorem is referenced by:  iswrdb  14471  snopiswrd  14474  iswrdsymb  14482  iswrddm0  14489  ffz0iswrd  14492  wrdnval  14496  wrdred1  14511  ccatcl  14525  swrdcl  14597  revcl  14712  repsw  14726  repsdf2  14729  cshf1  14761  wrdco  14782  wrdlen2i  14893  pmtrdifwrdellem1  19445  psgnunilem5  19458  ablfaclem2  20052  ablfac2  20055  wrdupgr  29173  wrdumgr  29185  crctcshtrl  29911  wlkiswwlks2lem5  29961  wlkiswwlksupgr2  29965  clwlkclwwlklem2a  30088  upgriseupth  30297  wrdres  33015  wrdpmcl  33018  ccatws1f1o  33031  ccatws1f1olast  33032  wrdpmtrlast  33174  cycpmconjslem1  33235  1arithidomlem1  33615  1arithidomlem2  33616  1arithidom  33617  subiwrd  34550  sseqp1  34560  ofcccat  34708  signstf  34731  signshwrd  34754  lpadlem1  34842  frlmfzowrd  42958  frlmvscadiccat  42962  grtriclwlk3  48418