use racket internal bitwise-and etc