Yesterday, nobody contributed anything. :-(
The official answer is:
log2(abs(floor(-(2 * x)) - x ^ 2))