Yesterday, nobody contributed anything.  :-(
The official answer is: abs(floor(x + e ^ (-x)))