| |
| | [No title] (Site not responding. Last check: 2007-10-22) |
 | | For example, try: `): print(` REij(1,1,{1,2},V); `): fi: end: Aijr:=proc(i,j,r,Alph) local gu,k,i1,k1,lu: if {i,j} intersect Alph |
 | | {i,j} then RETURN({}): fi: if r=0 then if i=j then RETURN({[]}): else RETURN({}): fi: fi: gu:={}: for k1 from 1 to nops(Alph) do k:=op(k1,Alph): lu:=Aijr(k,j,r-1,Alph): gu:=gu union {seq([[i,k],op(lu[i1])],i1=1..nops(lu))}: od: gu: end: #REij(i,j,Alph,V): A regular expression describing #words in the alphabet Alph that start at i and end in j #V denots (*). |
 | | For example, try: #REij(1,1,{1,2},V); REij:=proc(i,j,Alph,V) local gu,k,lu,Alph1,i1,k1,m,m1,gu1: if {i,j} intersect Alph |
| www.math.rutgers.edu /~zeilberg/tokhniot/GRW (120 words) |
|