A sample of dealing with binary file in Haskell.