add examples/tobits.hs