Haskell Nat Implementation

Testing

ghc Main.hs -package HUnit
./main

(S (S Z)) + (S (S Z))
(S (a + k))
(S (S (a + Z)))
(S (S (a)))
(S (S (S (S Z)))) == 4

(S (S Z)) * (S (S Z))
(S ((S (S Z)) + (S (S Z))))
(S (S (S (S (S (S (S (S Z)))))))

Name		Name	Last commit message	Last commit date
Latest commit History 9 Commits
.gitignore		.gitignore
Main.hs		Main.hs
README.md		README.md
example.png		example.png