:: (a, b) -> a -package:xmonad-contrib -package:loc -package:prelude-compat -package:stack

Extract the first component of a pair.
Given an Alist, return the key