将一个参数应用于多个函数

Question

是否可以将一个参数应用于榆木中的多个功能？

在示例中，x将应用于每个isDiv函数

isDiv : Int -> Int -> Bool
isDiv x y =
    modBy x y == 0


isLeapYear : Int -> Bool
isLeapYear x =
    x (isDiv 4 && isDiv 100 || isDiv 400)

最终这样做

isLeapYear : Int -> Bool
isLeapYear x =
    let
        isDiv y =
            modBy y x == 0
    in
    isDiv 4 && not (isDiv 100) || isDiv 400

Answer 1

您可以像这样在isLeapYear内编写一个辅助函数：

isLeapYear : Int -> Bool
isLeapYear x =
    let isDivX n = isDiv x n
    in isDivX 4 && isDivX 100 || isDivX 400