add haskell solution for CalculateDistance