#include <bits/stdc++.h>

using namespace std;

/// 21:50

ifstream fin("gather.in");
ofstream fout("gather.out");

const int NMAX = 750;
const int KMAX = 15;

int k, n, m;
int detinut[KMAX + 5];
int dp[NMAX + 5][NMAX + 5][KMAX + 5];
int dist[KMAX + 5][1 << (KMAX + 1) + 5];
/// dp[i][j][q] -> costul minim de a ajunge de pe orasul i pe orasul q folosind doar drumuri cu capatitatea >= j
struct elem
{
    int nod, cost, cnt;
    bool operator < (const elem other) const
    {
        return cost > other.cost;
    }
};

vector<elem> v[NMAX + 5];
priority_queue<elem> coada;

void Dijkstra(int start, int minim)
{
    coada.push({start, 0, 0});
    dp[start][minim][start] = 0;
    while(!coada.empty())
    {
        int nod = coada.top().nod;
        int cost = coada.top().cost;
        coada.pop();
        if(cost != dp[start][minim][nod])
        {
            continue;
        }
        for(auto it : v[nod])
        {
            if(it.cnt >= minim)
            {
                if(cost + it.cost < dp[start][minim][it.nod])
                {
                    int newcost = cost + it.cost;
                    dp[start][minim][it.nod] = newcost;
                    coada.push({it.nod, newcost, 0});
                }
            }
        }
    }
}

int cnt(int mask)
{
    int val = 0;
    for(int i = 1; i <= 20; i ++)
    {
        if(mask & (1 << i))
        {
            val++;
        }
    }
    return val;
}

int main()
{
    fin >> k >> n >> m;
    for(int i = 1; i <= k; i ++)
    {
        fin >> detinut[i];
    }
    while(m--)
    {
        int a, b, c, d;
        fin >> a >> b >> c >> d;
        v[a].push_back({b, c, d});
        v[b].push_back({a, c, d});
    }
    memset(dp, INT_MAX, sizeof dp);
    for(int i = 1; i <= k; i ++)
    {
        for(int j = 1; j <= k; j ++)
        {
            Dijkstra(detinut[i], j);
        }
    }
    memset(dist, INT_MAX, sizeof dist);
    for(int i = 1; i <= k; i ++)
    {
        dist[i][(1 << i)] = dp[detinut[i]][1][1];
    }
    for(int mask = 1; mask <= (1 << (k + 1)); mask ++)
    {
        for(int i = 1; i <= k; i ++)
        {
            if(mask & (1 << i))
            {
                for(int j = 1; j <= k; j ++)
                {
                    int val = mask & (1 << j);
                    if(val == 0)
                    {
                        dist[j][mask + (1 << j)] = min(dist[j][mask + (1 << j)], dist[i][mask] + cnt(mask) * dp[detinut[i]][cnt(mask)][detinut[j]]);
                    }
                }
            }
        }
    }
    int ans = INT_MAX;
    for(int i = 1; i <= k; i ++)
    {
        ans = min(ans, dist[i][(1 << (k + 1)) - 2]);
    }
    fout << ans << '\n';
    return 0;
}