:: (a, b) -> a -package:base-prelude -package:classy-prelude -package:distribution-opensuse -package:prelude-compat

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