Pakej: rewrite cpu.pl in Haskell