fst package:termonad

Extract the first component of a pair.