Я разработал функцию для вычисления среднего списка. Хотя он работает нормально, но я думаю, что это не может быть лучшим решением, поскольку он использует две функции, а не одну. Можно ли выполнить эту работу только с помощью одной рекурсивной функции?
calcMeanList (x:xs) = doCalcMeanList (x:xs) 0 0
doCalcMeanList (x:xs) sum length = doCalcMeanList xs (sum+x) (length+1)
doCalcMeanList [] sum length = sum/length