交换对组件

使用 swap（来自 Data.Tuple）来交换一对组件。

import Data.Tuple (swap)
swap (1, 2) -- evaluates to (2, 1)

或者使用模式匹配。

case (1, 2) of (x, y) => (y, x) -- evaluates to (2, 1)