Theorem iswrdi 14556

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 7420	. . . . 5 ⊢ (𝑙 = 𝐿 → (0..^𝑙) = (0..^𝐿))
2	1	feq2d 6691	. . . 4 ⊢ (𝑙 = 𝐿 → (𝑊:(0..^𝑙)⟶𝑆 ↔ 𝑊:(0..^𝐿)⟶𝑆))
3	2	rspcev 3582	. . 3 ⊢ ((𝐿 ∈ ℕ0 ∧ 𝑊:(0..^𝐿)⟶𝑆) → ∃𝑙 ∈ ℕ0 𝑊:(0..^𝑙)⟶𝑆)
4		0nn0 12520	. . . 4 ⊢ 0 ∈ ℕ0
5		fzo0n0 13747	. . . . . . . . 9 ⊢ ((0..^𝐿) ≠ ∅ ↔ 𝐿 ∈ ℕ)
6		nnnn0 12512	. . . . . . . . 9 ⊢ (𝐿 ∈ ℕ → 𝐿 ∈ ℕ0)
7	5, 6	sylbi 220	. . . . . . . 8 ⊢ ((0..^𝐿) ≠ ∅ → 𝐿 ∈ ℕ0)
8	7	necon1bi 2986	. . . . . . 7 ⊢ (¬ 𝐿 ∈ ℕ0 → (0..^𝐿) = ∅)
9		fzo0 13714	. . . . . . 7 ⊢ (0..^0) = ∅
10	8, 9	eqtr4di 2816	. . . . . 6 ⊢ (¬ 𝐿 ∈ ℕ0 → (0..^𝐿) = (0..^0))
11	10	feq2d 6691	. . . . 5 ⊢ (¬ 𝐿 ∈ ℕ0 → (𝑊:(0..^𝐿)⟶𝑆 ↔ 𝑊:(0..^0)⟶𝑆))
12	11	biimpa 481	. . . 4 ⊢ ((¬ 𝐿 ∈ ℕ0 ∧ 𝑊:(0..^𝐿)⟶𝑆) → 𝑊:(0..^0)⟶𝑆)
13		oveq2 7420	. . . . . 6 ⊢ (𝑙 = 0 → (0..^𝑙) = (0..^0))
14	13	feq2d 6691	. . . . 5 ⊢ (𝑙 = 0 → (𝑊:(0..^𝑙)⟶𝑆 ↔ 𝑊:(0..^0)⟶𝑆))
15	14	rspcev 3582	. . . 4 ⊢ ((0 ∈ ℕ0 ∧ 𝑊:(0..^0)⟶𝑆) → ∃𝑙 ∈ ℕ0 𝑊:(0..^𝑙)⟶𝑆)
16	4, 12, 15	sylancr 598	. . 3 ⊢ ((¬ 𝐿 ∈ ℕ0 ∧ 𝑊:(0..^𝐿)⟶𝑆) → ∃𝑙 ∈ ℕ0 𝑊:(0..^𝑙)⟶𝑆)
17	3, 16	pm2.61ian 823	. 2 ⊢ (𝑊:(0..^𝐿)⟶𝑆 → ∃𝑙 ∈ ℕ0 𝑊:(0..^𝑙)⟶𝑆)
18		iswrd 14554	. 2 ⊢ (𝑊 ∈ Word 𝑆 ↔ ∃𝑙 ∈ ℕ0 𝑊:(0..^𝑙)⟶𝑆)
19	17, 18	sylibr 237	1 ⊢ (𝑊:(0..^𝐿)⟶𝑆 → 𝑊 ∈ Word 𝑆)

Syntax hints:  ¬ wn 3   → wi 4   ∧ wa 400   = wceq 1570   ∈ wcel 2143   ≠ wne 2958  ∃wrex 3089  ∅c0 4287  ⟶wf 6534  (class class class)co 7412  0cc0 11101  ℕcn 12234  ℕ₀cn0 12505  ..^cfzo 13684  Word cword 14552

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1825  ax-4 1839  ax-5 1940  ax-6 1997  ax-7 2038  ax-8 2145  ax-9 2153  ax-10 2176  ax-11 2192  ax-12 2213  ax-ext 2735  ax-rep 5239  ax-sep 5258  ax-nul 5270  ax-pow 5338  ax-pr 5406  ax-un 7734  ax-cnex 11157  ax-resscn 11158  ax-1cn 11159  ax-icn 11160  ax-addcl 11161  ax-addrcl 11162  ax-mulcl 11163  ax-mulrcl 11164  ax-mulcom 11165  ax-addass 11166  ax-mulass 11167  ax-distr 11168  ax-i2m1 11169  ax-1ne0 11170  ax-1rid 11171  ax-rnegex 11172  ax-rrecex 11173  ax-cnre 11174  ax-pre-lttri 11175  ax-pre-lttrn 11176  ax-pre-ltadd 11177  ax-pre-mulgt0 11178

This theorem depends on definitions:  df-bi 210  df-an 401  df-or 861  df-3or 1104  df-3an 1105  df-tru 1573  df-fal 1583  df-ex 1810  df-nf 1814  df-sb 2097  df-mo 2567  df-eu 2597  df-clab 2742  df-cleq 2755  df-clel 2838  df-nfc 2912  df-ne 2959  df-nel 3065  df-ral 3080  df-rex 3090  df-reu 3370  df-rab 3417  df-v 3457  df-sbc 3746  df-csb 3855  df-dif 3909  df-un 3911  df-in 3913  df-ss 3923  df-pss 3926  df-nul 4288  df-if 4489  df-pw 4565  df-sn 4591  df-pr 4593  df-op 4597  df-uni 4874  df-iun 4959  df-br 5111  df-opab 5175  df-mpt 5194  df-tr 5220  df-id 5558  df-eprel 5563  df-po 5571  df-so 5572  df-fr 5616  df-we 5618  df-xp 5669  df-rel 5670  df-cnv 5671  df-co 5672  df-dm 5673  df-rn 5674  df-res 5675  df-ima 5676  df-pred 6304  df-ord 6365  df-on 6366  df-lim 6367  df-suc 6368  df-iota 6494  df-fun 6540  df-fn 6541  df-f 6542  df-f1 6543  df-fo 6544  df-f1o 6545  df-fv 6546  df-riota 7369  df-ov 7415  df-oprab 7416  df-mpo 7417  df-om 7864  df-1st 7987  df-2nd 7988  df-frecs 8279  df-wrecs 8310  df-recs 8359  df-rdg 8398  df-er 8695  df-en 8945  df-dom 8946  df-sdom 8947  df-pnf 11246  df-mnf 11247  df-xr 11248  df-ltxr 11249  df-le 11250  df-sub 11444  df-neg 11445  df-nn 12235  df-n0 12506  df-z 12593  df-uz 12864  df-fz 13537  df-fzo 13685  df-word 14553

This theorem is referenced by:  iswrdb  14559  snopiswrd  14562  iswrdsymb  14570  iswrddm0  14577  ffz0iswrd  14580  wrdnval  14584  wrdred1  14599  ccatcl  14613  swrdcl  14685  revcl  14800  repsw  14814  repsdf2  14817  cshf1  14849  wrdco  14870  wrdlen2i  14981  pmtrdifwrdellem1  19552  psgnunilem5  19565  ablfaclem2  20159  ablfac2  20162  wrdupgr  29413  wrdumgr  29425  crctcshtrl  30150  wlkiswwlks2lem5  30200  wlkiswwlksupgr2  30204  clwlkclwwlklem2a  30327  upgriseupth  30536  wrdres  33233  wrdpmcl  33236  ccatws1f1o  33249  ccatws1f1olast  33250  wrdpmtrlast  33391  cycpmconjslem1  33452  1arithidomlem1  33803  1arithidomlem2  33804  1arithidom  33805  subiwrd  34753  sseqp1  34763  ofcccat  34911  signstf  34931  signshwrd  34954  lpadlem1  35045  frlmfzowrd  43254  frlmvscadiccat  43258  grtriclwlk3  48687