Hopfield Networks for unsupervised learning in Haskell