:: (a, b) -> a -package:xmonad-contrib -package:LambdaHack package:protolude -is:exact

Extract the first component of a pair.