Data Update

Task/Sorting-algorithms-Selection-sort/F-Sharp/sorting-algorithms-selection-sort.fs

@@ -3,7 +3,7 @@ let rec ssort = function
     | x::xs ->
         let min, rest =
             List.fold (fun (min,acc) x ->
-                             if h<min then (h, min::acc)
-                             else (min, h::acc))
+                             if x<min then (x, min::acc)
+                             else (min, x::acc))
               (x, []) xs
         in min::ssort rest