Simon Marlow wrote:
> Jonathan Cast wrote:
>> Define
>>
>> swap (a, b) = (b, a)
>
> ew, that's far too crude. I think you mean
>
> swap = uncurry $ flip (,)
I think I would prefer something that mirrors flip more closely:
swap :: ((a,b) -> c) -> (b,a) -> c
swap = uncurry . flip . curry
- Jake