/*最大权闭合图；
题意：一些城市需要建路需要一些公司来负责，每个公司需要交一定的税，每条路需要给公司一定的花费，还有一个限制条件，假如说公司a建立了a-b，公司b建立了b-c那么选择
公司a 那么必须选择公司b。
现在要求最大收益.
解：设置一个源点和汇点，将选每个公司的收益和算出来，如果为正值和源点相连，如果为负值和和汇点相连权值为其绝对值，中间的公司之间有关系的权值置为inf，
最大权闭合图=所有正收益的和-最小割.
*/
#include<stdio.h>
#include<string.h>
#include<queue>
using namespace std;
#define N 5100//注意数组要开够
#define inf 0x3fffffff
int f[N],n,m,toa[N*5],nexta[N*5],heada[N*5],tob[N*5],nextb[N*5],headb[N*5],yonga,yongb;//临界表模拟容器
int fee[N*5],s,t;
struct node {
int u,v,w,next;
}bian[N*6+N*5*2];
int head[N],yong,dis[N];
void init(){//初始化
yong=0;
memset(head,-1,sizeof(head));
memset(dis,-1,sizeof(dis));
memset(toa,0,sizeof(toa));
memset(tob,0,sizeof(tob));
memset(heada,-1,sizeof(heada));
memset(headb,-1,sizeof(headb));
yonga=yongb=0;
memset(nexta,0,sizeof(nexta));
memset(nextb,0,sizeof(nextb));
}
void addfa(int u,int v) {
toa[yonga]=v;
nexta[yonga]=heada[u];
heada[u]=yonga++;
}
void addfb(int u,int v) {//临界表a
tob[yongb]=v;
nextb[yongb]=headb[u];
headb[u]=yongb++;
}
void addedge(int u,int v,int w) {//临界表b
bian[yong].u=u;
bian[yong].v=v;
bian[yong].w=w;
bian[yong].next=head[u];
head[u]=yong++;
}
void add(int u,int v,int w) {
addedge(u,v,w);
addedge(v,u,0);
}
/*isap模板*/
void bfs() {
int u,v,i;
queue<int>q;
q.push(t);
dis[t]=0;
while(!q.empty()) {
u=q.front();
q.pop();
for(i=head[u];i!=-1;i=bian[i].next) {
v=bian[i].v;
if(dis[v]==-1) {
dis[v]=dis[u]+1;
q.push(v);
}
}
}
return ;
}
int ISAP() {
int sum=0;
bfs();
int gap[N],cur[N],stac[N],top,i;
memset(gap,0,sizeof(gap));
for(i=s;i<=t;i++) {
gap[dis[i]]++;
cur[i]=head[i];
}
int k=s;
top=0;
while(dis[s]<t+1) {
if(k==t) {
int minn=inf,index;
for(i=0;i<top;i++) {
int e=stac[i];
if(minn>bian[e].w) {
minn=bian[e].w;
index=i;
}
}
for(i=0;i<top;i++) {
int e=stac[i];
bian[e].w-=minn;
bian[e^1].w+=minn;
}
sum+=minn;
top=index;
k=bian[stac[top]].u;
}
for(i=cur[k];i!=-1;i=bian[i].next) {
int v=bian[i].v;
if(bian[i].w&&dis[k]==dis[v]+1) {
cur[k]=i;
k=v;
stac[top++]=i;
break;
}
}
if(i==-1) {
int m=t+1;
for(i=head[k];i!=-1;i=bian[i].next)
if(m>dis[bian[i].v]&&bian[i].w) {
m=dis[bian[i].v];
cur[k]=i;
}
if(--gap[dis[k]]==0)break;
gap[dis[k]=m+1]++;
if(k!=s)
k=bian[stac[--top]].u;
}
}
return sum;
}
//模板
void build() {
int i,j,k;
for(i=1;i<=n;i++)
for(j=heada[i];j!=-1;j=nexta[j])
for(k=headb[i];k!=-1;k=nextb[k])//
add(tob[k],toa[j],inf);//以城市a结束的点的公司连接以城市a开始的点的公司
}
int main(){
int i,k,u,v,w,f,sum;
while(scanf("%d%d",&n,&m),n||m) {
init();
sum=0;
for(i=1;i<=m;i++)
scanf("%d",&fee[i]);
scanf("%d",&k);
while(k--) {
scanf("%d%d%d%d",&u,&v,&w,&f);
addfa(u,w);//以u开头的公司
addfb(v,w);//以v结束的公司
fee[w]-=f;//选每个公司可获得的收益
}
s=0;t=m+1;
for(i=1;i<=m;i++) {
if(fee[i]>0) {//如果为正，与源点相连
add(s,i,fee[i]);
sum+=fee[i];//计算所有权值为正的
}
else
add(i,t,-fee[i]);//如果为负将权值的绝对值与t相连
}
build();
sum=sum-ISAP();
if(sum<=0)//如果没有收益输出0
printf("0
");
else
printf("%d
",sum);
}
return 0;
}