Problem: Year 20XX — a nuclear explosion has burned the world. Half the people on the planet have died. Fearful.

One city, fortunately, was not directly damaged by the explosion. This city consists of N domes (numbered 1 through N inclusive) and M bidirectional transportation pipelines connecting the domes. In dome i, Pi citizens reside currently and there is a nuclear shelter capable of protecting Ki citizens. Also, it takes Di days to travel from one end to the other end of pipeline i.

It has been turned out that this city will be polluted by nuclear radiation in L days after today. So each citizen should take refuge in some shelter, possibly traveling through the pipelines. Citizens will be dead if they reach their shelters in exactly or more than L days.

How many citizens can survive at most in this situation?



Input

The input consists of multiple test cases. Each test case begins with a line consisting of three integers N, M and L (1 ≤ N ≤ 100, M ≥ 0, 1 ≤ L ≤ 10000). This is followed by M lines describing the configuration of transportation pipelines connecting the domes. The i-th line contains three integers Ai, Bi and Di (1 ≤ Ai < Bi ≤ N, 1 ≤ Di ≤ 10000), denoting that the i-th pipeline connects dome Ai and Bi. There is at most one pipeline between any pair of domes. Finally, there come two lines, each consisting of N integers. The first gives P1 , . . ., PN (0 ≤ Pi ≤ 106) and the second gives K1 , . . ., KN (0 ≤ Ki ≤ 106).

The input is terminated by EOF. All integers in each line are separated by a whitespace.

Output

For each test case, print in a line the maximum number of people who can survive.

Example

Input

1 0 1
51
50
2 1 1
1 2 1
1000 0
0 1000
4 3 5
1 2 4
1 3 1
3 4 2
0 1000 1000 1000
3000 0 0 0


Output

50
0
3000

Solution (in CPP):

Solution:
#include <cstdio>
#include <cstdlib>
#include <cstring>
#include <climits>
#include <cmath>
#include <cassert>
#include <iostream>
#include <sstream>
#include <iomanip>
#include <algorithm>
#include <numeric>
#include <complex>
#include <list>
#include <stack>
#include <queue>
#include <set>
#include <map>
#include <bitset>
#include <utility>
#include <functional>
#include <iterator>

using namespace std;

#define dump(n) cerr<<"# "<<#n<<"="<<(n)<<endl
#define repi(i,a,b) for(int i=int(a);i<int(b);i++)
#define peri(i,a,b) for(int i=int(b);i-->int(a);)
#define rep(i,n) repi(i,0,n)
#define per(i,n) peri(i,0,n)
#define iter(c) __typeof__((c).begin())
#define foreach(i,c) for(iter(c) i=(c).begin();i!=(c).end();++i)
#define all(c) (c).begin(),(c).end()
#define mp make_pair

typedef unsigned int uint;
typedef long long ll;
typedef unsigned long long ull;
typedef vector<int> vi;
typedef vector<vi> vvi;
typedef vector<double> vd;
typedef vector<vd> vvd;
typedef vector<string> vs;
typedef pair<int,int> pii;

const int INFTY=1<<29;

struct Edge{
	int src,dst,flow,capacity,next;
	Edge(){}
	Edge(int s,int d,int f,int c,int n):src(s),dst(d),flow(f),capacity(c),next(n){}
};

void AddEdge(vector<Edge>& es,vi& head,int src,int dst,int flow,int capacity){
	es.push_back(Edge(src,dst,flow,capacity,head[src]));
	head[src]=es.size()-1;
}

vi BFS(const vector<Edge>& es,const vi& head,int begin)
{
	int size=head.size();
	vi label(size,size);
	queue<pii> q;
	q.push(mp(begin,0));
	while(q.size()){
		pii cur=q.front(); q.pop();
		if(label[cur.first]<=cur.second)
			continue;
		label[cur.first]=cur.second;
		for(int i=head[cur.first];i!=-1;i=es[i].next)
			if(es[i].capacity-es[i].flow>0)
				q.push(mp(es[i].dst,cur.second+1));
	}
	return label;
}

int DFS(vector<Edge>& es,vi& head,int v,int end,const vi& label,int f)
{
	if(v==end)
		return f;
	for(int& i=head[v];i!=-1;i=es[i].next){
		Edge& e=es[i];
		if(label[e.src]>=label[e.dst])
			continue;
		int residue=e.capacity-e.flow;
		if(residue<=0)
			continue;
		int augment=DFS(es,head,e.dst,end,label,min(residue,f));
		if(augment>0){
			e.flow+=augment;
			es[i^1].flow-=augment;
			return augment;
		}
	}
	return 0;
}

int Dinic(vector<Edge>& es,const vi& head,int begin,int end)
{
	int size=head.size();
	for(;;){
		vi label=BFS(es,head,begin);
		if(label[end]==size)
			break;
		vi temp=head;
		while(DFS(es,temp,begin,end,label,INFTY))
			;
	}
	int res=0;
	for(int i=head[begin];i!=-1;i=es[i].next)
		res+=es[i].flow;
	return res;
}

int main()
{
	for(int n,m,l;~scanf("%d%d%d",&n,&m,&l);){
		vvi g(n,vi(n,INFTY));
		rep(i,n) g[i][i]=0;
		rep(i,m){
			int s,d,w; scanf("%d%d%d",&s,&d,&w);
			g[s-1][d-1]=g[d-1][s-1]=w;
		}
		vi ps(n),ks(n);
		rep(i,n) scanf("%d",&ps[i]);
		rep(i,n) scanf("%d",&ks[i]);
		
		rep(k,n) rep(i,n) rep(j,n)
			g[i][j]=min(g[i][j],g[i][k]+g[k][j]);
		
		vector<Edge> es;
		vi head(2*n+2,-1);
		rep(i,n){
			AddEdge(es,head,i,n+i,0,INFTY);
			AddEdge(es,head,n+i,i,0,0);
			repi(j,i+1,n)
				if(g[i][j]<l){
					AddEdge(es,head,i,n+j,0,INFTY);
					AddEdge(es,head,n+j,i,0,0);
					AddEdge(es,head,j,n+i,0,INFTY);
					AddEdge(es,head,n+i,j,0,0);
				}
		}
		int src=2*n,snk=src+1;
		rep(i,n){
			AddEdge(es,head,src,i,0,ps[i]);
			AddEdge(es,head,i,src,0,0);
			AddEdge(es,head,n+i,snk,0,ks[i]);
			AddEdge(es,head,snk,n+i,0,0);
		}
		
		printf("%d\n",Dinic(es,head,src,snk));
	}
	
	return 0;
}