function
(brushift n & shifts )
Returns the value of integer `n` bit shifted right by the sum of
all values in `shifts` ; integers only. The sign of `n` is not
preserved , so for positive shifts the return value is always be
positive.
(= (brushift 2r1000 1 1 1 ) 2r0001 )
# => true