# Exact value involving `ProductLog`

By manual manipulation, it’s not too difficult to show that the value of the following expression is exactly $$1.$$ How to convince Mathematica to do the simplification?

``````2/3 - ProductLog(-(Log(2)/(3 2^(1/3))))/Log(2)
``````