author | Eugen Sawin <sawine@me73.com> |
Sat, 05 Mar 2011 15:04:05 +0100 | |
changeset 9 | e088ae08440c |
permissions | -rw-r--r-- |
lindenmannm@3 | 1 |
forall(v:V) |
lindenmannm@3 | 2 |
Insert(Q, infty, v); |
lindenmannm@3 | 3 |
Wähle einen Knoten w:V als Wurzel; |
lindenmannm@3 | 4 |
DecreaseKey(Q, 0, w); |
lindenmannm@3 | 5 |
p[w]=nil; |
lindenmannm@3 | 6 |
while(!Empty(Q)) { |
lindenmannm@3 | 7 |
(d,u)=DeleteMin(Q); |
lindenmannm@3 | 8 |
forall((u,v):E) |
lindenmannm@3 | 9 |
if(v:Q && c(u,v)<v.Key) { |
lindenmannm@3 | 10 |
DecreaseKey(Q, c(u,v), v); |
lindenmannm@3 | 11 |
p[v]=u; |
lindenmannm@3 | 12 |
} |