Remove reinvention of StateT: use the one provided by Haskell platform
Simplify arithmetic coding module