import Data.Bits

main = print (expr 77)

expr :: Int -> Int
expr n = (n .|. 1 - 1)