module B (B, module B) where

fromI64 :: I64 -> B
fromI64 = andI# 1#