Tuples
======

```haskell
fst :: (a, b) -> a
```

```haskell
snd :: (a, b) -> b
```

```haskell
swap :: (a, b) -> (b, a)
```

```haskell
curry :: ((a, b) -> c) -> a -> b -> c
```

```haskell
uncurry :: (a -> b -> c) -> (a, b) -> c
```