複合函數有多個參數

Question

這是我的計劃：

boolToInt True = 1 
boolToInt False = 0 

gt :: Int -> Int -> Int 
gt x y = boolToInt $ (>) x y 

我嘗試重構gt與gt = boolToInt . (>)，但得到的錯誤：

‘(>)’ is applied to too few arguments

來找我唯一的想法是curry和uncurry，但我想這可能會使gt比gt x y = boolToInt $ (>) x y更加複雜。

我有更漂亮的功能解決方案，這種組成？

Answer 1

你可以這樣做：

(boolToInt .) . (>) 

Answer 2

神奇pointfree.io想出了以下解決方案：

gt :: Int -> Int -> Int 
gt = (boolToInt .) . (>)