AdaBoost from A.I. A Modern Approach in Haskell