Применить один аргумент к нескольким функциям

Question

Есть ли способ применить один аргумент к нескольким функциям в 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

Answer 1

Вы можете написать вспомогательную функцию внутри isLeapYear, например:

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