#include<cstdio>
#include<vector>
#define maxn 105
#define inf 2147483647
using namespace std;
int n,k,m,s,t;
int ci[maxn],jud[maxn][maxn];
//struct E{
//	int to,w;
//};
//vector<E>edge[maxn*maxn];
//void add(int a,int b,int w){
//	edge[a].push_back((E){b,w});
//	edge[b].push_back((E){a,w});
//}
int dist[maxn][maxn];
inline void Floyd()
{
	for(int k=1;k<=n;k++)
	for(int i=1;i<=n;i++)
	for(int j=1;j<=n;j++)
	if(i!=j)dist[i][j] = min(dist[i][j],dist[i][k]+dist[k][j] );
	return ;
}

int main()
{
	freopen("culture.in","r",stdin);
	freopen("culture.out","w",stdout);
	scanf("%d%d%d%d%d",&n,&k,&m,&s,&t);
	if(ci[s]==ci[t]){
		printf("-1\n");
		return 0;
	}
	for(int i=1; i<=n; i++)
	for(int j=1; j<=n; j++)
	if(i!=j) dist[i][j] = inf;
	
	for(int i=1;i<=n;i++)scanf("%d",&ci[i]);
	for(int i=1;i<=k;i++){
		for(int j=1;j<=k;j++){
			scanf("%d",&jud[i][j]);
		}
	}
	for(int i=1;i<=m;i++){
		int a,b,w;
		scanf("%d%d%d",&a,&b,&w);
		if(jud[ci[b]][ci[a]]==0&&ci[b]!=ci[a])dist[a][b]=min(dist[a][b],w);
        if(jud[ci[a]][ci[b]]==0&&ci[b]!=ci[a])dist[b][a]=min(dist[b][a],w);
	}
	Floyd();
	if(dist[s][t]==2147483647)printf("-1\n");
	else printf("%d",dist[s][t]);

	return 0;
}
/*
2 2 1 1 2
1 2
0 1
0 0
1 2 10
*/