[Haskell-beginners] Genetic algorithm for knapsack problem