:: (a, b) -> a -package:base-prelude -package:ghc package:mixed-types-num

Extract the first component of a pair.