#include <bits/stdc++.h>
using namespace std;
#define erorp(x) cout<<#x<<"={"<<(x.F)<<" , "<<x.S<<"}"<<endl
#define print(v,r) f(i,0,r) cout<<v[i]<<" "; cout<<endl
#define eror(x) cout<<#x<<'='<<(x)<<endl
#define f_(i,a,b) for(int i=a;i>=b;i--)
#define f(i,a,b) for(int i=a;i<b;i++)
#define nb(x) __builtin_popcount(x)
#define maxm(a,b) a=max(a,b)
#define minm(a,b) a=min(a,b)
#define Add(x,y) x=(x+y)%mod
#define lst(x) x[x.size()-1]
#define sz(x) int(x.size())
#define mp make_pair
#define ll long long
#define pb push_back
#define S second
#define F first
#define pll pair<ll,ll>
const int N=2e5+99,K=5;
const ll inf=1e15;
int n,k,m,mv,a[N],imp[N],col[N];
ll ans=inf,dp[N][(1<<K)];
vector<int> v[(1<<K)];
vector<pair<int,int> > g[N];
void build(){
f(mask1,0,(1<<k)){
f(mask2,0,(1<<k)){
if(((mask1&mask2)==0)){
v[mask1].pb(mask2);
}
}
}
}
void solve(int mk){
if(nb(mk)>2) return ;
priority_queue<pll, vector<pll>, greater<pll> > s;
f(i,1,n+1){
s.push(mp(dp[i][mk],i));
}
while(s.size()){
pair<ll,int> p=s.top();
s.pop();
if(dp[p.S][mk]!=p.F) continue ;
int u=p.S;
f(i,0,g[u].size()){
if(dp[u][mk]+g[u][i].S<dp[g[u][i].F][mk]){
dp[g[u][i].F][mk]=dp[u][mk]+g[u][i].S;
s.push(mp(dp[g[u][i].F][mk],g[u][i].F));
}
}
}
f(i,1,n+1){
int u=i,mask=mk;
f(i,0,g[u].size()){
f(j,1,v[mask].size()){
minm(dp[g[u][i].F][mask|v[mask][j]],dp[u][mask]+dp[g[u][i].F][v[mask][j]]+g[u][i].S);
}
}
}
}
main(){
ios:: sync_with_stdio(0), cin.tie(0), cout.tie(0);
fill(col,col+N,-1);
cin>>n>>k>>m;
build();
f(i,0,k){
cin>>imp[i];
col[imp[i]]=i;
}
f(i,0,m){
int u,v,c;
cin>>u>>v>>c;
g[u].pb(mp(v,c));
g[v].pb(mp(u,c));
}
f(i,1,n+1){
f(mask,0,(1<<k)){
dp[i][mask]=inf;
}
}
f(i,1,n+1){
if(col[i]==-1){
dp[i][0]=0;
}
else{
dp[i][(1<<col[i])]=0;
}
}
f(mask,0,(1<<k)){
solve(mask);
}
f(i,1,n+1){
f(mask1,0,(1<<k)){
f(mask2,0,(1<<k)){
int mask3=0;
if(col[i]!=-1) mask3=(1<<col[i]);
if((mask1|mask2|mask3)==(1<<k)-1){
minm(ans,dp[i][mask1]+dp[i][mask2]);
}
}
}
}
cout<<ans;
}
