X-Git-Url: http://git.euphorik.ch/?p=master-thesis.git;a=blobdiff_plain;f=Parasitemia%2FParasitemia%2FHeap.fs;h=39c6a4be5f882fe9bfbc68b93d5b4ff899c67d79;hp=c2ab69f1cab7dab40aad081e16b017de589cfada;hb=dcf3645b3426991237567e90bab9806a9c111cd1;hpb=bef2e9f0bf1bba21d4c988fdf654c2dc303ec34a

diff --git a/Parasitemia/Parasitemia/Heap.fs b/Parasitemia/Parasitemia/Heap.fs
index c2ab69f..39c6a4b 100644
--- a/Parasitemia/Parasitemia/Heap.fs
+++ b/Parasitemia/Parasitemia/Heap.fs
@@ -18,6 +18,7 @@ type Heap<'k, 'v when 'k : comparison> () =
         if r < a.Count && a.[r].key > a.[max].key
         then
             max <- r
+
         if max <> i
         then
             let tmp = a.[i]