A Haskell library for generating Code 128 barcodes