MPE Home Metamath Proof Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >  eqwrds3 Structured version   Visualization version   GIF version

Theorem eqwrds3 14189
Description: A word is equal with a length 3 string iff it has length 3 and the same symbol at each position. (Contributed by AV, 12-May-2021.)
Assertion
Ref Expression
eqwrds3 ((𝑊 ∈ Word 𝑉 ∧ (𝐴𝑉𝐵𝑉𝐶𝑉)) → (𝑊 = ⟨“𝐴𝐵𝐶”⟩ ↔ ((♯‘𝑊) = 3 ∧ ((𝑊‘0) = 𝐴 ∧ (𝑊‘1) = 𝐵 ∧ (𝑊‘2) = 𝐶))))

Proof of Theorem eqwrds3
Dummy variable 𝑖 is distinct from all other variables.
StepHypRef Expression
1 s3cl 14106 . . 3 ((𝐴𝑉𝐵𝑉𝐶𝑉) → ⟨“𝐴𝐵𝐶”⟩ ∈ Word 𝑉)
2 eqwrd 13723 . . 3 ((𝑊 ∈ Word 𝑉 ∧ ⟨“𝐴𝐵𝐶”⟩ ∈ Word 𝑉) → (𝑊 = ⟨“𝐴𝐵𝐶”⟩ ↔ ((♯‘𝑊) = (♯‘⟨“𝐴𝐵𝐶”⟩) ∧ ∀𝑖 ∈ (0..^(♯‘𝑊))(𝑊𝑖) = (⟨“𝐴𝐵𝐶”⟩‘𝑖))))
31, 2sylan2 583 . 2 ((𝑊 ∈ Word 𝑉 ∧ (𝐴𝑉𝐵𝑉𝐶𝑉)) → (𝑊 = ⟨“𝐴𝐵𝐶”⟩ ↔ ((♯‘𝑊) = (♯‘⟨“𝐴𝐵𝐶”⟩) ∧ ∀𝑖 ∈ (0..^(♯‘𝑊))(𝑊𝑖) = (⟨“𝐴𝐵𝐶”⟩‘𝑖))))
4 s3len 14121 . . . . 5 (♯‘⟨“𝐴𝐵𝐶”⟩) = 3
54eqeq2i 2790 . . . 4 ((♯‘𝑊) = (♯‘⟨“𝐴𝐵𝐶”⟩) ↔ (♯‘𝑊) = 3)
65a1i 11 . . 3 ((𝑊 ∈ Word 𝑉 ∧ (𝐴𝑉𝐵𝑉𝐶𝑉)) → ((♯‘𝑊) = (♯‘⟨“𝐴𝐵𝐶”⟩) ↔ (♯‘𝑊) = 3))
76anbi1d 620 . 2 ((𝑊 ∈ Word 𝑉 ∧ (𝐴𝑉𝐵𝑉𝐶𝑉)) → (((♯‘𝑊) = (♯‘⟨“𝐴𝐵𝐶”⟩) ∧ ∀𝑖 ∈ (0..^(♯‘𝑊))(𝑊𝑖) = (⟨“𝐴𝐵𝐶”⟩‘𝑖)) ↔ ((♯‘𝑊) = 3 ∧ ∀𝑖 ∈ (0..^(♯‘𝑊))(𝑊𝑖) = (⟨“𝐴𝐵𝐶”⟩‘𝑖))))
8 oveq2 6986 . . . . . 6 ((♯‘𝑊) = 3 → (0..^(♯‘𝑊)) = (0..^3))
9 fzo0to3tp 12941 . . . . . 6 (0..^3) = {0, 1, 2}
108, 9syl6eq 2830 . . . . 5 ((♯‘𝑊) = 3 → (0..^(♯‘𝑊)) = {0, 1, 2})
1110raleqdv 3355 . . . 4 ((♯‘𝑊) = 3 → (∀𝑖 ∈ (0..^(♯‘𝑊))(𝑊𝑖) = (⟨“𝐴𝐵𝐶”⟩‘𝑖) ↔ ∀𝑖 ∈ {0, 1, 2} (𝑊𝑖) = (⟨“𝐴𝐵𝐶”⟩‘𝑖)))
12 fveq2 6501 . . . . . . . 8 (𝑖 = 0 → (𝑊𝑖) = (𝑊‘0))
13 fveq2 6501 . . . . . . . 8 (𝑖 = 0 → (⟨“𝐴𝐵𝐶”⟩‘𝑖) = (⟨“𝐴𝐵𝐶”⟩‘0))
1412, 13eqeq12d 2793 . . . . . . 7 (𝑖 = 0 → ((𝑊𝑖) = (⟨“𝐴𝐵𝐶”⟩‘𝑖) ↔ (𝑊‘0) = (⟨“𝐴𝐵𝐶”⟩‘0)))
15 s3fv0 14118 . . . . . . . . 9 (𝐴𝑉 → (⟨“𝐴𝐵𝐶”⟩‘0) = 𝐴)
16153ad2ant1 1113 . . . . . . . 8 ((𝐴𝑉𝐵𝑉𝐶𝑉) → (⟨“𝐴𝐵𝐶”⟩‘0) = 𝐴)
1716eqeq2d 2788 . . . . . . 7 ((𝐴𝑉𝐵𝑉𝐶𝑉) → ((𝑊‘0) = (⟨“𝐴𝐵𝐶”⟩‘0) ↔ (𝑊‘0) = 𝐴))
1814, 17sylan9bbr 503 . . . . . 6 (((𝐴𝑉𝐵𝑉𝐶𝑉) ∧ 𝑖 = 0) → ((𝑊𝑖) = (⟨“𝐴𝐵𝐶”⟩‘𝑖) ↔ (𝑊‘0) = 𝐴))
19 fveq2 6501 . . . . . . . 8 (𝑖 = 1 → (𝑊𝑖) = (𝑊‘1))
20 fveq2 6501 . . . . . . . 8 (𝑖 = 1 → (⟨“𝐴𝐵𝐶”⟩‘𝑖) = (⟨“𝐴𝐵𝐶”⟩‘1))
2119, 20eqeq12d 2793 . . . . . . 7 (𝑖 = 1 → ((𝑊𝑖) = (⟨“𝐴𝐵𝐶”⟩‘𝑖) ↔ (𝑊‘1) = (⟨“𝐴𝐵𝐶”⟩‘1)))
22 s3fv1 14119 . . . . . . . . 9 (𝐵𝑉 → (⟨“𝐴𝐵𝐶”⟩‘1) = 𝐵)
2322eqeq2d 2788 . . . . . . . 8 (𝐵𝑉 → ((𝑊‘1) = (⟨“𝐴𝐵𝐶”⟩‘1) ↔ (𝑊‘1) = 𝐵))
24233ad2ant2 1114 . . . . . . 7 ((𝐴𝑉𝐵𝑉𝐶𝑉) → ((𝑊‘1) = (⟨“𝐴𝐵𝐶”⟩‘1) ↔ (𝑊‘1) = 𝐵))
2521, 24sylan9bbr 503 . . . . . 6 (((𝐴𝑉𝐵𝑉𝐶𝑉) ∧ 𝑖 = 1) → ((𝑊𝑖) = (⟨“𝐴𝐵𝐶”⟩‘𝑖) ↔ (𝑊‘1) = 𝐵))
26 fveq2 6501 . . . . . . . 8 (𝑖 = 2 → (𝑊𝑖) = (𝑊‘2))
27 fveq2 6501 . . . . . . . 8 (𝑖 = 2 → (⟨“𝐴𝐵𝐶”⟩‘𝑖) = (⟨“𝐴𝐵𝐶”⟩‘2))
2826, 27eqeq12d 2793 . . . . . . 7 (𝑖 = 2 → ((𝑊𝑖) = (⟨“𝐴𝐵𝐶”⟩‘𝑖) ↔ (𝑊‘2) = (⟨“𝐴𝐵𝐶”⟩‘2)))
29 s3fv2 14120 . . . . . . . . 9 (𝐶𝑉 → (⟨“𝐴𝐵𝐶”⟩‘2) = 𝐶)
3029eqeq2d 2788 . . . . . . . 8 (𝐶𝑉 → ((𝑊‘2) = (⟨“𝐴𝐵𝐶”⟩‘2) ↔ (𝑊‘2) = 𝐶))
31303ad2ant3 1115 . . . . . . 7 ((𝐴𝑉𝐵𝑉𝐶𝑉) → ((𝑊‘2) = (⟨“𝐴𝐵𝐶”⟩‘2) ↔ (𝑊‘2) = 𝐶))
3228, 31sylan9bbr 503 . . . . . 6 (((𝐴𝑉𝐵𝑉𝐶𝑉) ∧ 𝑖 = 2) → ((𝑊𝑖) = (⟨“𝐴𝐵𝐶”⟩‘𝑖) ↔ (𝑊‘2) = 𝐶))
33 0zd 11808 . . . . . 6 ((𝐴𝑉𝐵𝑉𝐶𝑉) → 0 ∈ ℤ)
34 1zzd 11829 . . . . . 6 ((𝐴𝑉𝐵𝑉𝐶𝑉) → 1 ∈ ℤ)
35 2z 11830 . . . . . . 7 2 ∈ ℤ
3635a1i 11 . . . . . 6 ((𝐴𝑉𝐵𝑉𝐶𝑉) → 2 ∈ ℤ)
3718, 25, 32, 33, 34, 36raltpd 4591 . . . . 5 ((𝐴𝑉𝐵𝑉𝐶𝑉) → (∀𝑖 ∈ {0, 1, 2} (𝑊𝑖) = (⟨“𝐴𝐵𝐶”⟩‘𝑖) ↔ ((𝑊‘0) = 𝐴 ∧ (𝑊‘1) = 𝐵 ∧ (𝑊‘2) = 𝐶)))
3837adantl 474 . . . 4 ((𝑊 ∈ Word 𝑉 ∧ (𝐴𝑉𝐵𝑉𝐶𝑉)) → (∀𝑖 ∈ {0, 1, 2} (𝑊𝑖) = (⟨“𝐴𝐵𝐶”⟩‘𝑖) ↔ ((𝑊‘0) = 𝐴 ∧ (𝑊‘1) = 𝐵 ∧ (𝑊‘2) = 𝐶)))
3911, 38sylan9bbr 503 . . 3 (((𝑊 ∈ Word 𝑉 ∧ (𝐴𝑉𝐵𝑉𝐶𝑉)) ∧ (♯‘𝑊) = 3) → (∀𝑖 ∈ (0..^(♯‘𝑊))(𝑊𝑖) = (⟨“𝐴𝐵𝐶”⟩‘𝑖) ↔ ((𝑊‘0) = 𝐴 ∧ (𝑊‘1) = 𝐵 ∧ (𝑊‘2) = 𝐶)))
4039pm5.32da 571 . 2 ((𝑊 ∈ Word 𝑉 ∧ (𝐴𝑉𝐵𝑉𝐶𝑉)) → (((♯‘𝑊) = 3 ∧ ∀𝑖 ∈ (0..^(♯‘𝑊))(𝑊𝑖) = (⟨“𝐴𝐵𝐶”⟩‘𝑖)) ↔ ((♯‘𝑊) = 3 ∧ ((𝑊‘0) = 𝐴 ∧ (𝑊‘1) = 𝐵 ∧ (𝑊‘2) = 𝐶))))
413, 7, 403bitrd 297 1 ((𝑊 ∈ Word 𝑉 ∧ (𝐴𝑉𝐵𝑉𝐶𝑉)) → (𝑊 = ⟨“𝐴𝐵𝐶”⟩ ↔ ((♯‘𝑊) = 3 ∧ ((𝑊‘0) = 𝐴 ∧ (𝑊‘1) = 𝐵 ∧ (𝑊‘2) = 𝐶))))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 198  wa 387  w3a 1068   = wceq 1507  wcel 2050  wral 3088  {ctp 4446  cfv 6190  (class class class)co 6978  0cc0 10337  1c1 10338  2c2 11498  3c3 11499  cz 11796  ..^cfzo 12852  chash 13508  Word cword 13675  ⟨“cs3 14069
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1758  ax-4 1772  ax-5 1869  ax-6 1928  ax-7 1965  ax-8 2052  ax-9 2059  ax-10 2079  ax-11 2093  ax-12 2106  ax-13 2301  ax-ext 2750  ax-rep 5050  ax-sep 5061  ax-nul 5068  ax-pow 5120  ax-pr 5187  ax-un 7281  ax-cnex 10393  ax-resscn 10394  ax-1cn 10395  ax-icn 10396  ax-addcl 10397  ax-addrcl 10398  ax-mulcl 10399  ax-mulrcl 10400  ax-mulcom 10401  ax-addass 10402  ax-mulass 10403  ax-distr 10404  ax-i2m1 10405  ax-1ne0 10406  ax-1rid 10407  ax-rnegex 10408  ax-rrecex 10409  ax-cnre 10410  ax-pre-lttri 10411  ax-pre-lttrn 10412  ax-pre-ltadd 10413  ax-pre-mulgt0 10414
This theorem depends on definitions:  df-bi 199  df-an 388  df-or 834  df-3or 1069  df-3an 1070  df-tru 1510  df-ex 1743  df-nf 1747  df-sb 2016  df-mo 2547  df-eu 2583  df-clab 2759  df-cleq 2771  df-clel 2846  df-nfc 2918  df-ne 2968  df-nel 3074  df-ral 3093  df-rex 3094  df-reu 3095  df-rab 3097  df-v 3417  df-sbc 3684  df-csb 3789  df-dif 3834  df-un 3836  df-in 3838  df-ss 3845  df-pss 3847  df-nul 4181  df-if 4352  df-pw 4425  df-sn 4443  df-pr 4445  df-tp 4447  df-op 4449  df-uni 4714  df-int 4751  df-iun 4795  df-br 4931  df-opab 4993  df-mpt 5010  df-tr 5032  df-id 5313  df-eprel 5318  df-po 5327  df-so 5328  df-fr 5367  df-we 5369  df-xp 5414  df-rel 5415  df-cnv 5416  df-co 5417  df-dm 5418  df-rn 5419  df-res 5420  df-ima 5421  df-pred 5988  df-ord 6034  df-on 6035  df-lim 6036  df-suc 6037  df-iota 6154  df-fun 6192  df-fn 6193  df-f 6194  df-f1 6195  df-fo 6196  df-f1o 6197  df-fv 6198  df-riota 6939  df-ov 6981  df-oprab 6982  df-mpo 6983  df-om 7399  df-1st 7503  df-2nd 7504  df-wrecs 7752  df-recs 7814  df-rdg 7852  df-1o 7907  df-oadd 7911  df-er 8091  df-en 8309  df-dom 8310  df-sdom 8311  df-fin 8312  df-card 9164  df-pnf 10478  df-mnf 10479  df-xr 10480  df-ltxr 10481  df-le 10482  df-sub 10674  df-neg 10675  df-nn 11442  df-2 11506  df-3 11507  df-n0 11711  df-z 11797  df-uz 12062  df-fz 12712  df-fzo 12853  df-hash 13509  df-word 13676  df-concat 13737  df-s1 13762  df-s2 14075  df-s3 14076
This theorem is referenced by:  wrdl3s3  14190  s3sndisj  14191  s3iunsndisj  14192  elwwlks2ons3im  27463  umgrwwlks2on  27466  elwwlks2  27475  elwspths2spth  27476
  Copyright terms: Public domain W3C validator