Flatten's nested Option to a single level.
expect(some(some(1)), some(1)); expect(some(none()), none());
Option<A> flatten<A>(Option<Option<A>> option) => option._bindSome(identity);