#include<iostream>

#include<cstdio>

#include<cstring>

using namespace std;

int n,p,c,i,j,x,y,t,min1,head,tail,tot,u;

int a[][],b[],dis[],num[],w[][],team[];//team为队列，dis为距离，num为邻接点个数，a存相邻点

bool exist[];//exist是存在的意思，确定某个元素是否存在

int main()

    cin>>n>>p>>c;//奶牛数，牧场数，牧场间的道路数

    for(i=; i<=p; i++)

    {

        b[i]=;

        num[i]=;

        for(j=; j<=p; j++)

            w[i][j]=0x7fffffff/;//第i到第j个牧场的路程初始化为无穷

    }

for(i=; i<=n; i++)

        cin>>b[i];//输入奶牛所在的牧场号

    for(i=; i<=c; i++) //邻接矩阵存储，采用循环队列能够降低队列大小，队列长度只需开到2*n+5即可。

    {

        cin>>x>>y>>t;//相连牧场AB和两牧场间的距离

        w[x][y]=t;//保存x到y间的距离

        a[x][++num[x]]=y;//存相邻点,在num原有的基础上加一，并将y点存入

        a[y][++num[y]]=x;//存相邻点,在num原有的基础上加一，并将x点存入

        w[y][x]=w[x][y];//因为是双向连通的，所以两牧场间的距离相等

    }

for(i=; i<=p; i++)

    {

        for(j=; j<=p; j++) dis[j]=0x7fffffff/;

        //memset(team,0,sizeof(team));                         //队列数组初始化

        //memset(exist,false,sizeof(exist));                   //exist标志初始化

        dis[i]=;

        team[]=i;

        head=;

        tail=;

        exist[i]=true;      //起始点入队

        while(head!=tail)

        {

            head++;

            head=((head-)%)+;                           //循环队列处理

            u=team[head];

            exist[u]=false;

            for(j=; j<=num[u]; j++) //num数组储存的为当前点所相邻的点的个数

                if (dis[a[u][j]]>dis[u]+w[u][a[u][j]])

                {

                    dis[a[u][j]]=dis[u]+w[u][a[u][j]];

                    if (!exist[a[u][j]])//如果该点没有被拿出，就进行处理

                    {

                        tail++;

                        tail=((tail-)%)+;

                        team[tail]=a[u][j];

                        exist[a[u][j]]=true;//拿出该数

                    }

                }

            }

        tot=;

        for(j=; j<=n; j++)

            tot+=dis[b[j]];//累加路程并计算

        if (tot<min1) min1=tot;//找最小

    }

    cout<<min1;

    return ;