fromLeft' x ≡ x^?!_Left
>>> fromLeft' (Left 12) 12
leftToMaybe ≡ either Just (const Nothing)
leftToMaybe ≡ preview _Left leftToMaybe x ≡ x^?_Left
>>> leftToMaybe (Left 12) Just 12
>>> leftToMaybe (Right 12) Nothing