Wie finde ich die minimale Kantenabdeckung eines gewichteten zweiteiligen Graphen mit Mathematica 8?

In der Graphentheorie verwenden wir den ungarischen Algorithmus zur Berechnung der minimalen Kantenabdeckung eines gewichteten zweiteiligen Graphen (eine Menge von Kanten, die auf alle Ecken auftrifft, die mit dem minimalen Gesamtgewicht.)

Ich finde, dass es in der neuen Version 8 von Mathematica ein ganz neues Paket von Funktionen für die Graphentheorie gibt (beginnen Sie mit Graph [].) Aber ich habe keine Funktion gefunden, die diese Aufgabe erledigt. Ich finde eine Funktion namens FindEdgeCover [], die nur eine Kantenabdeckung finden kann, nicht die minimale.