Add Haskell expression for machines
Merge pull request #2756 from jwiegley/machines

Add Haskell expression for machines