X-Git-Url: http://git.euphorik.ch/?a=blobdiff_plain;ds=sidebyside;f=Parasitemia%2FParasitemiaCore%2FHeap.fs;h=32887a230b6cf5cdbde185dde5f441e13661e3f7;hb=000e7091983f20ef75d0eba9bf1c865c76483f24;hp=c23cdbbcb652e05182f0d9b4b8421d47d05dc283;hpb=97c24aa168f06f507fdff79429038d78a2c33326;p=master-thesis.git
diff --git a/Parasitemia/ParasitemiaCore/Heap.fs b/Parasitemia/ParasitemiaCore/Heap.fs
index c23cdbb..32887a2 100644
--- a/Parasitemia/ParasitemiaCore/Heap.fs
+++ b/Parasitemia/ParasitemiaCore/Heap.fs
@@ -14,8 +14,8 @@ type private Node<'k, 'v> =
override this.ToString () = sprintf "%A -> %A" this.key this.value
///
-/// An heap min or max depending of the comparer.
-/// The goal is to have a set of data and be able to get the value associated with the min (or max) key.
+/// An heap min or max depending of the given key comparer.
+/// The goal is to have a set of data and be able to get the value associated with the min (or max) key value.
///
type Heap<'k, 'v> (kComparer : IComparer<'k>) =
let a = List>()
@@ -98,5 +98,3 @@ type Heap<'k, 'v> (kComparer : IComparer<'k>) =
max.key, max.value
member this.Clear () = a.Clear()
-
-