Theorem iswrdi 14073

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 7221	. . . . 5 ⊢ (𝑙 = 𝐿 → (0..^𝑙) = (0..^𝐿))
2	1	feq2d 6531	. . . 4 ⊢ (𝑙 = 𝐿 → (𝑊:(0..^𝑙)⟶𝑆 ↔ 𝑊:(0..^𝐿)⟶𝑆))
3	2	rspcev 3537	. . 3 ⊢ ((𝐿 ∈ ℕ0 ∧ 𝑊:(0..^𝐿)⟶𝑆) → ∃𝑙 ∈ ℕ0 𝑊:(0..^𝑙)⟶𝑆)
4		0nn0 12105	. . . 4 ⊢ 0 ∈ ℕ0
5		fzo0n0 13294	. . . . . . . . 9 ⊢ ((0..^𝐿) ≠ ∅ ↔ 𝐿 ∈ ℕ)
6		nnnn0 12097	. . . . . . . . 9 ⊢ (𝐿 ∈ ℕ → 𝐿 ∈ ℕ0)
7	5, 6	sylbi 220	. . . . . . . 8 ⊢ ((0..^𝐿) ≠ ∅ → 𝐿 ∈ ℕ0)
8	7	necon1bi 2969	. . . . . . 7 ⊢ (¬ 𝐿 ∈ ℕ0 → (0..^𝐿) = ∅)
9		fzo0 13266	. . . . . . 7 ⊢ (0..^0) = ∅
10	8, 9	eqtr4di 2796	. . . . . 6 ⊢ (¬ 𝐿 ∈ ℕ0 → (0..^𝐿) = (0..^0))
11	10	feq2d 6531	. . . . 5 ⊢ (¬ 𝐿 ∈ ℕ0 → (𝑊:(0..^𝐿)⟶𝑆 ↔ 𝑊:(0..^0)⟶𝑆))
12	11	biimpa 480	. . . 4 ⊢ ((¬ 𝐿 ∈ ℕ0 ∧ 𝑊:(0..^𝐿)⟶𝑆) → 𝑊:(0..^0)⟶𝑆)
13		oveq2 7221	. . . . . 6 ⊢ (𝑙 = 0 → (0..^𝑙) = (0..^0))
14	13	feq2d 6531	. . . . 5 ⊢ (𝑙 = 0 → (𝑊:(0..^𝑙)⟶𝑆 ↔ 𝑊:(0..^0)⟶𝑆))
15	14	rspcev 3537	. . . 4 ⊢ ((0 ∈ ℕ0 ∧ 𝑊:(0..^0)⟶𝑆) → ∃𝑙 ∈ ℕ0 𝑊:(0..^𝑙)⟶𝑆)
16	4, 12, 15	sylancr 590	. . 3 ⊢ ((¬ 𝐿 ∈ ℕ0 ∧ 𝑊:(0..^𝐿)⟶𝑆) → ∃𝑙 ∈ ℕ0 𝑊:(0..^𝑙)⟶𝑆)
17	3, 16	pm2.61ian 812	. 2 ⊢ (𝑊:(0..^𝐿)⟶𝑆 → ∃𝑙 ∈ ℕ0 𝑊:(0..^𝑙)⟶𝑆)
18		iswrd 14071	. 2 ⊢ (𝑊 ∈ Word 𝑆 ↔ ∃𝑙 ∈ ℕ0 𝑊:(0..^𝑙)⟶𝑆)
19	17, 18	sylibr 237	1 ⊢ (𝑊:(0..^𝐿)⟶𝑆 → 𝑊 ∈ Word 𝑆)

Syntax hints:  ¬ wn 3   → wi 4   ∧ wa 399   = wceq 1543   ∈ wcel 2110   ≠ wne 2940  ∃wrex 3062  ∅c0 4237  ⟶wf 6376  (class class class)co 7213  0cc0 10729  ℕcn 11830  ℕ₀cn0 12090  ..^cfzo 13238  Word cword 14069

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1803  ax-4 1817  ax-5 1918  ax-6 1976  ax-7 2016  ax-8 2112  ax-9 2120  ax-10 2141  ax-11 2158  ax-12 2175  ax-ext 2708  ax-rep 5179  ax-sep 5192  ax-nul 5199  ax-pow 5258  ax-pr 5322  ax-un 7523  ax-cnex 10785  ax-resscn 10786  ax-1cn 10787  ax-icn 10788  ax-addcl 10789  ax-addrcl 10790  ax-mulcl 10791  ax-mulrcl 10792  ax-mulcom 10793  ax-addass 10794  ax-mulass 10795  ax-distr 10796  ax-i2m1 10797  ax-1ne0 10798  ax-1rid 10799  ax-rnegex 10800  ax-rrecex 10801  ax-cnre 10802  ax-pre-lttri 10803  ax-pre-lttrn 10804  ax-pre-ltadd 10805  ax-pre-mulgt0 10806

This theorem depends on definitions:  df-bi 210  df-an 400  df-or 848  df-3or 1090  df-3an 1091  df-tru 1546  df-fal 1556  df-ex 1788  df-nf 1792  df-sb 2071  df-mo 2539  df-eu 2568  df-clab 2715  df-cleq 2729  df-clel 2816  df-nfc 2886  df-ne 2941  df-nel 3047  df-ral 3066  df-rex 3067  df-reu 3068  df-rab 3070  df-v 3410  df-sbc 3695  df-csb 3812  df-dif 3869  df-un 3871  df-in 3873  df-ss 3883  df-pss 3885  df-nul 4238  df-if 4440  df-pw 4515  df-sn 4542  df-pr 4544  df-tp 4546  df-op 4548  df-uni 4820  df-iun 4906  df-br 5054  df-opab 5116  df-mpt 5136  df-tr 5162  df-id 5455  df-eprel 5460  df-po 5468  df-so 5469  df-fr 5509  df-we 5511  df-xp 5557  df-rel 5558  df-cnv 5559  df-co 5560  df-dm 5561  df-rn 5562  df-res 5563  df-ima 5564  df-pred 6160  df-ord 6216  df-on 6217  df-lim 6218  df-suc 6219  df-iota 6338  df-fun 6382  df-fn 6383  df-f 6384  df-f1 6385  df-fo 6386  df-f1o 6387  df-fv 6388  df-riota 7170  df-ov 7216  df-oprab 7217  df-mpo 7218  df-om 7645  df-1st 7761  df-2nd 7762  df-wrecs 8047  df-recs 8108  df-rdg 8146  df-er 8391  df-en 8627  df-dom 8628  df-sdom 8629  df-pnf 10869  df-mnf 10870  df-xr 10871  df-ltxr 10872  df-le 10873  df-sub 11064  df-neg 11065  df-nn 11831  df-n0 12091  df-z 12177  df-uz 12439  df-fz 13096  df-fzo 13239  df-word 14070

This theorem is referenced by:  iswrdb  14075  snopiswrd  14078  iswrdsymb  14086  iswrddm0  14093  ffz0iswrd  14096  wrdnval  14100  wrdred1  14115  ccatcl  14129  swrdcl  14210  revcl  14326  repsw  14340  repsdf2  14343  cshf1  14375  wrdco  14396  wrdlen2i  14507  pmtrdifwrdellem1  18873  psgnunilem5  18886  ablfaclem2  19473  ablfac2  19476  wrdupgr  27176  wrdumgr  27188  crctcshtrl  27907  wlkiswwlks2lem5  27957  wlkiswwlksupgr2  27961  clwlkclwwlklem2a  28081  upgriseupth  28290  wrdres  30931  cycpmconjslem1  31140  subiwrd  32064  sseqp1  32074  ofcccat  32234  signstf  32257  signshwrd  32280  lpadlem1  32369  frlmfzowrd  39946  frlmvscadiccat  39950