var v:array[1..2000,1..27]of longint;
    i,j,s,k,n,m,nr,c1,c2:longint;
    g:array[1..26,1..26]of longint;
    c:char;

begin
assign(input,'nrcuv.in');reset(input);
assign(output,'nrcuv.out');rewrite(output);
readln(n,m);
for i:=1 to m do
        begin
        read(c);
        c1:=ord(c)-ord('a')+1;
        read(c);
        read(c);
        c2:=ord(c)-ord('a')+1;
        g[c1,c2]:=1;
        g[c2,c1]:=1;
        readln;
        end;
for i:=1 to 27 do
        v[1,i]:=1;
for i:=2 to n do
        for j:=1 to 26 do
              for k:=1 to 26 do
                begin
                if g[j,k]+g[k,j]=0 then
                        v[i,j]:=(v[i,j]+v[i-1,k])mod 104659;
                end;
for i:=1 to 26 do
        s:=(s+v[n,i])mod 104659;
writeln(s);
close(input);close(output);
end.