import sys
readline = sys.stdin.readline
N, M = map(int, readline().split())
INF = 10**18
C = [INF]*N
C[1:N-1] = map(int, readline().split())
from collections import deque
class Dinic:
def __init__(self, N):
self.N = N
self.G = [[] for i in range(N)]
def add_edge(self, fr, to, cap):
forward = [to, cap, None]
forward[2] = backward = [fr, 0, forward]
self.G[fr].append(forward)
self.G[to].append(backward)
def add_multi_edge(self, v1, v2, cap1, cap2):
edge1 = [v2, cap1, None]
edge1[2] = edge2 = [v1, cap2, edge1]
self.G[v1].append(edge1)
self.G[v2].append(edge2)
def bfs(self, s, t):
self.level = level = [None]*self.N
deq = deque([s])
level[s] = 0
G = self.G
while deq:
v = deq.popleft()
lv = level[v] + 1
for w, cap, _ in G[v]:
if cap and level[w] is None:
level[w] = lv
deq.append(w)
return level[t] is not None
def dfs(self, v, t, f):
if v == t:
return f
level = self.level
for e in self.it[v]:
w, cap, rev = e
if cap and level[v] < level[w]:
d = self.dfs(w, t, min(f, cap))
if d:
e[1] -= d
rev[1] += d
return d
return 0
def flow(self, s, t):
flow = 0
INF = 10**18 + 7
G = self.G
while self.bfs(s, t):
*self.it, = map(iter, self.G)
f = INF
while f:
f = self.dfs(s, t, INF)
flow += f
return flow
dinic = Dinic(2*N+2)
ok = 1
for i in range(M):
a, b = map(int, readline().split()); a -= 1; b -= 1
if C[a] == C[b] == -1:
ok = 0
break
dinic.add_edge(2*a+1, 2*b, INF)
for i in range(N):
if C[i] == -1:
dinic.add_edge(2*i, 2*N+1, INF)
dinic.add_edge(2*N, 2*i+1, INF)
else:
dinic.add_edge(2*i, 2*i+1, C[i])
if not ok:
sys.stdout.write("-1\n")
exit(0)
sys.stdout.write("%d\n" % dinic.flow(2*N, 2*N+1))