d ╭─────╮ d >───┼─────┼───> >───┼─ f ─┼───> b ╰─────╯ c
secondA f ≡ bitraverse pure f
>>> secondA (find odd) (Left []) Just (Left [])
>>> secondA (find odd) (Left [1, 2, 3]) Just (Left [1,2,3])
>>> secondA (find odd) (Right [4, 5]) Just (Right 5)
>>> secondA (find odd) ([1, 2, 3], [4, 5]) Just ([1,2,3],5)
>>> secondA (find odd) ([1,2,3], [4]) Nothing