---
from: http://rosettacode.org/wiki/Set_right-adjacent_bits