:: (a -> c) -> (a, b) -> (c, b)

mapFst f = f -*- id
Update the first component of a pair.
first succ (1,"test") == (2,"test")
Applies a function to the first element of a pair. Often known on the wild as mapFst.
> first (*10) (1,2)
(10,2)