#include <stdio.h>
#include <vector>
#include <queue>
#define INF 1000000000
#define MAXK 17
#define MAXN 2001
int n,v[MAXK],c[MAXN][MAXN],dj[MAXK][MAXN],d[1<<MAXK][MAXK];

struct edge{
  int y,cost;
};

struct comp{
  bool operator()(const edge &a, const edge &b){
    return a.cost>b.cost;
  }
};

std::vector<edge>l[MAXN];

void dijkstra(int x){//pornind din nodul v[x], dj[i][j]=dr min de la nodul v[i] la nodul j
  for(int i=1; i<=n; i++)
    dj[x][i]=INF;
  std::priority_queue<edge,std::vector<edge>,comp>q;
  q.push({v[x],0});
  while(!q.empty()){
    edge f=q.top();
    q.pop();
    if(dj[x][f.y]==INF){
      dj[x][f.y]=f.cost;
      for(auto i: l[f.y])
        if(dj[x][i.y]==INF)
          q.push({i.y,f.cost+i.cost});
    }
  }
}

int main(){
  FILE *fin=fopen("ubuntzei.in","r");
  FILE *fout=fopen("ubuntzei.out","w");
  int m,k,i,j,x,y,cost;

  fscanf(fin,"%d%d%d",&n,&m,&k);
  v[0]=1;
  for(i=1; i<=k; i++)
    fscanf(fin,"%d",&v[i]);
  v[k+1]=n;
  k+=2;
  for(i=0; i<n; i++)
    for(j=0; j<n; j++)
      c[i][j]=INF;
  for(i=0; i<m; i++){
    fscanf(fin,"%d%d%d",&x,&y,&cost);
    c[x][y]=c[y][x]=cost;
    l[x].push_back({y,cost});
    l[y].push_back({x,cost});
  }
  for(i=0; i<k; i++)
    dijkstra(i);
  for(i=0; i<(1<<k); i++)
    for(j=0; j<k; j++)
      d[i][j]=INF;
  d[1][0]=0;
  for(int mask=3; mask<(1<<k); mask++)
    for(i=0; i<k; i++)
      if(mask&(1<<i))
        for(j=0; j<k; j++)
          if(i!=j && mask&(1<<j) && d[mask][i]>d[mask^(1<<i)][j]+dj[j][v[i]])
            d[mask][i]=d[mask^(1<<i)][j]+dj[j][v[i]];
  fprintf(fout,"%d\n",d[(1<<k)-1][k-1]);
  fclose(fin);
  fclose(fout);
  return 0;
}