:: [a] -> [(a, a)] package:numeric-prelude