Haskell Subset to Dafny translator