funclang series4: Removed unused commented code from quickSort.

funclang-taddeus/series4/ass8.ml

@@ -8,17 +8,6 @@ let rec quickSort (l:int list) =
         let cmp x = x < pivot in
         let low, high = partition cmp rest in
         quickSort low @ pivot :: quickSort high
-        (*let rec assign low high l =
-            match l with
-            (* Assigning elements is done, sort the lower and higher sublists
-             * individually and concatenate them with the pivot *)
-            | [] -> quickSort low @ pivot :: quickSort high
-            (* Assign a list element to the lower or higher sublist,
-             * depending on its comparison to the pivot *)
-            | h::t -> if h <= pivot then assign (h::low) high t
-                                    else assign low (h::high) t
-        in
-        asign [] [] rest*)
 ;;
 
 (* Sort a list l using the merge sort algorithm *)