curry
is the wrong thing to use here; it turns a function operating on tuples into a curried function. You want the opposite, which is uncurry
:
uncurry :: (a -> b -> c) -> (a, b) -> c
In this case, it's uncurry (<)
.
(Another useful source for combinators useful in writing functions on tuples is Control.Arrow
; since (->)
is an instance of Arrow
, you can read a b c
as b -> c
.)
与恶龙缠斗过久,自身亦成为恶龙;凝视深渊过久,深渊将回以凝视…