#include <iostream>
#include <cstring>
#include < string>
#include <cstdio>
#include <cstdlib>
#include <map>
#include <queue>
using  namespace std;

const  int MAXN =  3010;
const  int MAXM =  500510;
const  int INF =  0x3f3f3f3f;

struct Edge
{
     int u, v, w;
     int next;
}edge[MAXN], Save[MAXN]; 
                // Save储存边的值
int n, m;
int cnt;

int first[MAXN], d[MAXN];
int vis[MAXN];

void init()
{
    cnt =  0;
    memset(first, - 1,  sizeof(first));
    memset(vis,  0,  sizeof(vis));
    memset(d, INF,  sizeof(d));
}

void read_graph( int u,  int v,  int w)
{
    edge[cnt].v = v, edge[cnt].w = w;
    edge[cnt].next = first[u], first[u] = cnt++;
}

void read_case()
{
    init();
     for( int i =  1; i <= m; i++)
    {
         int u, v, w;
        scanf( " %d%d%d ", &u, &v, &w);
        read_graph(u, v, w);
        read_graph(v, u, w);
        Save[i].u = u, Save[i].v = v, Save[i].w = w;
    }
     int f;
     for( int i =  1; i <= n; i++)
    {
        scanf( " %d ", &f);
        vis[i] = f;
    }
}

void spfa( int src,  int f)
{
    queue< int> q;
     bool inq[MAXN] = { 0};
    d[src] =  0;    // 初始点需要置0 
    q.push(src);
     while(!q.empty())
    {
         int x = q.front(); q.pop();
        inq[x] =  0;
         for( int e = first[x]; e != - 1; e = edge[e].next)
        {
             int v = edge[e].v, w = edge[e].w;
             if(d[v] > d[x] + w && vis[v] == f)  // 枚举每个A或者B国家中到源点的最短距离
            {
                d[v] = d[x] + w;
                 if(!inq[v])
                {
                    inq[v] =  1;
                    q.push(v);
                }
            }
        }
    }
}

void solve()
{
     int ans = INF;
    read_case();
    spfa( 1,  1);
    spfa( 2,  2);
     for( int i =  1; i <= m; i++)
    {
         int u = Save[i].u, v = Save[i].v, w = Save[i].w;  // 储存边，枚举时需要用到 
         if(vis[u] != vis[v])
        {
             if(d[u] + d[v] + w < ans)
            {
                ans = d[u] + d[v] + w;
            }
        }
    }
     if(ans < INF)
    {
        printf( " %d\n ", ans);
    }
     else printf( " -1\n ");
}

int main()
{
     while(~scanf( " %d%d ", &n, &m))
    {
        solve();
    }
     return  0;
}