#include<bits/stdc++.h>
#define f first
#define s second
#define pb push_back
#define ld long double
using namespace std;

const int N=53,L=26;
int nxt[N][N];
int dist[N][N][2][2];
int main(){
    memset(dist,-1,sizeof dist);
    for(int i=0;i<N;i++)for(int j=0;j<N;j++)nxt[i][j]=-1;
    int n,p,t;
    scanf("%i %i %i",&n,&p,&t);
    vector<bool> fin(n);
    for(int i=0;i<p;i++){
        int x;
        scanf("%i",&x);
        fin[x-1]=1;
    }
    for(int i=0;i<t;i++){
        int a,b;
        string s;
        cin >> a >> s >> b;
        a--;b--;
        int ind=0;
        if(s[0]>='a'&&s[0]<='z')ind=s[0]-'a';
        else ind=s[0]-'A'+L;
        nxt[a][ind]=b;
    }
    vector<queue<pair<pair<int,int>,pair<bool,bool>>>> qs(N*N*4);
    auto up=[&](int a,int b, bool same, bool must,int di){
        if(dist[a][b][same][must]==-1||dist[a][b][same][must]>di){
            //printf("%i %i  %i  %i   %i\n",a,b,same?1:0,must?1:0,di);
            dist[a][b][same][must]=di;
            qs[di].push({{a,b},{same,must}});
        }
    };
    up(0,0,1,0,0);
    for(int t=0;t<N*N*4;t++){
        while(qs[t].size()){
            auto x=qs[t].front();
            int a=x.f.f,b=x.f.s;
            bool same=x.s.f;
            bool must=x.s.s;
            qs[t].pop();
            if(dist[a][b][same][must]!=t)continue;
            if(fin[a]&&fin[b]&&!same&&!must){
                printf("%i\n",t);
                return 0;
            }
            if(same){
                assert(!must);
                assert(a==b);
                for(int k=L;k<2*L;k++){
                    if(nxt[a][k]!=-1&&nxt[b][k]!=-1){
                        up(nxt[a][k],nxt[b][k],1,0,t+2);
                    }
                }
                for(int k1=0;k1<L;k1++){
                    if(nxt[a][k1]!=-1){
                        for(int k2=0;k2<L;k2++){
                            if(nxt[b][k2]!=-1){
                                if(k1==k2){
                                    up(nxt[a][k1],nxt[b][k2],1,0,t+2);
                                }
                                else{
                                    up(nxt[a][k1],nxt[b][k2],0,0,t+2);
                                }
                            }
                        }
                        up(a,nxt[b][k1],0,1,t+1);
                    }
                }
            }
            else{
                // Uppercase
                for(int k=L;k<2*L;k++){
                    if(nxt[a][k]!=-1&&nxt[b][k]!=-1){
                        up(nxt[a][k],nxt[b][k],0,0,t+2);
                    }
                }
                for(int k=0;k<L;k++){
                    if(nxt[a][k]!=-1&&!must){
                        up(nxt[a][k],b,same,must,t+1);
                    }
                    if(nxt[b][k]!=-1){
                        up(a,nxt[b][k],same,must,t+1);
                    }
                }
            }
        }
    }
    printf("-1\n");
}