:: (a, b) -> a -package:base-prelude package:distribution-opensuse is:exact

Extract the first component of a pair.