gsbvd

Begutachten Sie die Ihnen vorliegende Lösung zur Aufgabe "edgeCompare" aus Blatt 8. Folgende Kriterien sind dabei zu berücksichtigen:
Korrektheit,
Vollständigkeit,
Lesbarkeit und
Testdaten (ausreichende Testfälle).
Hinweis: Schreiben Sie Ihre Begutachtung (Review) als Kommentare in den vorliegenden Quelltext ein.


/*(1.)*/
compareEdge(Delta, [_,_,W1],[_,_,W2]):-compare(Delta, W1,W2).
/*?- compareEdge(Delta,[11,22,33],[1,2,3]).
Delta = >.*/

/*(2.)*/
minimumEdge(Edges,H):-predsort(compareEdge,Edges,[H|_]).
/*?- minimumEdge([[1,2,6],[5,7,9],[7,5,1]],X).
X = [7, 5, 1].  */