Как отделить два оператора (или эквивалент точки с запятой)

Question

oddSquareSum :: Integer 
oddSquareSum = 
    let oddSquares = filter odd $ map (^2) [1..] 
     belowLimit = takeWhile (<10000) oddSquares 
    in sum belowLimit 
    --extra code to print the list of integers 
    show belowLimit 

Это код для печати суммы квадратов нечетных чисел. Список квадратов нечетных чисел находится в списке, belowLimit и как я могу его распечатать?

Добавление в качестве дополнительной строки в конце дает ошибки компиляции, поскольку вызов функции show рассматривается как аргумент функции sum.

Answer 1

Просто для полноты картины, если вы просто хотите поместить в какой-нибудь временный код для отладки и ни хотите изменить подпись, ни разделить функции, вы также имеете возможность использовать traceShow из Debug.Trace:

import Debug.Trace (traceShow) 

oddSquareSum :: Integer 
oddSquareSum = 
    let oddSquares = filter odd $ map (^2) [1..] 
     belowLimit = takeWhile (<10000) oddSquares 
    in traceShow belowLimit $ sum belowLimit 

Answer 2

Вы не можете, а не с тем типом, который у вас есть. Я бы тоже не рекомендовал менять тип в этом случае. Haskell делает различие между типом кода между кодом, который только вычисляет значения и код, который имеет побочные эффекты, такие как печать на экране. Сначала это странная концепция, но она очень полезна для рассуждения о вашем коде, даже на языках, которые его не применяют (я много использую эту стратегию на Python). Вместо этого, написать еще одну функцию, которая будет печатать значение, такие, как

printAnswer :: IO()  -- The IO means that this can have side effects 
printAnswer = print oddSquareSum 

oddSquareSum :: Integer 
oddSquareSum = 
    let oddSquares = filter odd $ map (^2) [1..] 
     belowLimit = takeWhile (<10000) oddSquares 
    in sum belowLimit 

Затем вы можете запустить printAnswer из GHCi после загрузки исходного файла, или вы можете иметь main вызов printAnswer, а затем компилировать файл в исполняемый файл. Если вы собираетесь использовать GHCi, вы можете вообще пропустить эту оболочку и просто введите oddSquareSum прямо в консоль, чтобы увидеть ее значение.