Please provide the Haskell code that have the following sample output

To calculate the sum Exex(x-u), you can either use a list comprehension or the map function (my sneaky way to make you search on Hoogle again). An added little wrinkle: Calculating the mean by dividing the sum of the list elements by the length of the list fails if the list is empty. Implement your function so it returns (0,0) for the empty list: >>> :1 question2.hs [1 of 1] Compiling Main (question2.hs, interpreted) Ok, one module loaded. >>> basicStats 0 (0.0,0.0) >>> basicStats [1..10] (5.5, 2.8722813232690143) To calculate the sum Exex(x-u), you can either use a list comprehension or the map function (my sneaky way to make you search on Hoogle again). An added little wrinkle: Calculating the mean by dividing the sum of the list elements by the length of the list fails if the list is empty. Implement your function so it returns (0,0) for the empty list: >>> :1 question2.hs [1 of 1] Compiling Main (question2.hs, interpreted) Ok, one module loaded. >>> basicStats 0 (0.0,0.0) >>> basicStats [1..10] (5.5, 2.8722813232690143)