add toRight and toLeft to OptionT which return an EitherT