:: Ord a => [a] -> [a] -package:lens -package:extra -package:vector-algorithms -package:witherable -package:hedgehog is:exact package:errors

A minimum that fails using mzero
A maximum that fails using mzero
tailSafe [] = []
tailSafe [1,3,4] = [3,4]