fst package:extra

Extract the first component of a pair.
Extract the fst of a triple.