1note :: e -> Maybe a -> Either e a
2note e Nothing = Left e
3note _ (Just a) = Right a
4