#include<bits/stdc++.h>
#define ff first
#define ss second
#define pb push_back
typedef long long ll;
using namespace std;
typedef pair<int,int> pii;

const int mod=998244353;
inline int add(int x,int y){int ret=x+y;if(ret>=mod)ret-=mod;return ret;}
inline int sub(int x,int y){int ret=x-y;if(ret<0)ret+=mod;return ret;}
inline int mul(int x,int y){return ((ll)x*y)%mod;}
inline int step(int base,int pw){int ret=1;while(pw){if(pw&1)ret=mul(ret,base);base=mul(base,base);pw>>=1;}return ret;}
inline int invv(int x){return step(x,mod-2);}


const int maxn=100+10;
const int maxalp=26*2+1;
int get_val(char x){
    if(x>='a' && x<='z')return x-'a';
    return x-'A'+26;
}

vector<pii>vect[maxn];
int s,p,t,n;
int trans[maxn][maxalp];

void add_edge(int x,int y,int c){
    vect[x].pb({y,c});
    trans[x][c]=y;
}

vector<pii>jmp[maxn][maxalp];
void calc(int x){

    int strt=x;

    queue<int>q;
    q.push(x);
    vector<int>dist(maxn,-1);
    dist[x]=0;

    while(q.size()){

        int x=q.front();
        q.pop();

        for(int i=0;i<vect[x].size();i++){
            int id=vect[x][i].ff;
            int v=vect[x][i].ss;

            if(v<26){
                if(dist[id]!=-1)continue;
                dist[id]=dist[x]+1;
                q.push(id);
            }
            else if(v<2*26){
                if(dist[x]>0)jmp[strt][v].pb({id,dist[x]+1});
            }

        }

    }

}
void prek(){
    for(int i=1;i<=s;i++){
        calc(i);
    }
}

int dp[maxn][maxn][2];
typedef pair<pii,int> state;
set<pair<int,state>>st;

void update_result(state a,state b,int d){

    if(dp[a.ff.ff][a.ff.ss][a.ss]+d<dp[b.ff.ff][b.ff.ss][b.ss]){
        st.erase({dp[b.ff.ff][b.ff.ss][b.ss],b});
        dp[b.ff.ff][b.ff.ss][b.ss]=dp[a.ff.ff][a.ff.ss][a.ss]+d;
        st.insert({dp[b.ff.ff][b.ff.ss][b.ss],b});
    }

}

void go(){

    state strt={{1,1},1};
    st.insert({0,strt});

    int inf=1e9;
    for(int i=0;i<maxn;i++)
        for(int j=0;j<maxn;j++)
        dp[i][j][0]=dp[i][j][1]=inf;

    dp[1][1][1]=0;

    vector<int>lowend;
    for(int i=0;i<26;i++)lowend.pb(i);
    lowend.pb(maxalp-1);

    int rez=-1;
    while(st.size()){

        state x=(*st.begin()).ss;
        st.erase(st.begin());

        if(x.ff.ff>s && x.ff.ss>s && x.ss==0){
            rez=dp[x.ff.ff][x.ff.ss][x.ss];
            break;
        }

        int a,b;
        a=x.ff.ff;
        b=x.ff.ss;

        if(x.ss==0){

            /// uppercase;
            for(int i=26;i<2*26;i++){
                if(trans[a][i]==-1 || trans[b][i]==-1)continue;
                update_result(x,{{trans[a][i],trans[b][i]},0},2);
            }

            ///one lowercase
            for(int i=0;i<lowend.size();i++){
                int v=lowend[i];
                if(trans[a][v]!=-1)update_result(x,{{trans[a][v],b},0},1);
                if(trans[b][v]!=-1)update_result(x,{{a,trans[b][v]},0},1);
            }

        }
        else{

            /// uppercase i lowercase isti
            for(int i=0;i<2*26;i++){
                if(trans[a][i]==-1 || trans[b][i]==-1)continue;
                update_result(x,{{trans[a][i],trans[b][i]},1},2);
            }

            for(int i=0;i<lowend.size();i++){
                for(int j=0;j<lowend.size();j++){
                    if(i==j)continue;

                    int vi=lowend[i];
                    int vj=lowend[j];
                    if(trans[a][vi]==-1 || trans[b][vj]==-1)continue;

                    update_result(x,{{trans[a][vi],trans[b][vj]},0},2 );

                }
            }

            /// upper prvi, lower u upper drugi
            for(int i=26;i<2*26;i++){
                if(trans[a][i]==-1)continue;

                for(int j=0;j<jmp[b][i].size();j++){
                    int d=jmp[b][i][j].ss;
                    int nxt=jmp[b][i][j].ff;

                    update_result(x,{{trans[a][i],nxt},0 },d+1);
                }
            }

            /// obrnuto
            for(int i=26;i<2*26;i++){
                if(trans[b][i]==-1)continue;

                for(int j=0;j<jmp[a][i].size();j++){
                    int d=jmp[a][i][j].ss;
                    int nxt=jmp[a][i][j].ff;

                    update_result(x,{{nxt,trans[b][i]},0 },d+1);
                }
            }

        }

    }

    if(rez==-1)printf("%d\n",rez);
    else printf("%d\n",rez-2);
}

int main(){

    ///freopen("test.txt","r",stdin);

    memset(trans,-1,sizeof(trans));

    scanf("%d %d %d",&s,&p,&t);
    n=s;
    for(int i=1;i<=p;i++){
        int x;
        scanf("%d",&x);
        add_edge(x,++n,maxalp-1);
    }

    for(int i=1;i<=t;i++){
        int a,b;
        char c;
        cin>>a>>c>>b;
        add_edge(a,b,get_val(c));
    }

    prek();

    go();

    return 0;
}