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

Apply one argument to multiple functions

有没有一种方法可以将一个参数应用于 elm 中的多个函数?

在示例中,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

您可以在 isLeapYear 中编写一个辅助函数,如下所示:

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