Improved project structure.

2017-06-01 14:50:23 +02:00
parent 5e06b03248
commit 89f0d81598
25 changed files with 2 additions and 0 deletions
--- a/haskell/e016.hs
+++ b/haskell/e016.hs
@@ -0,0 +1,9 @@
+import Data.Char
+
+myPow :: Integral a => a -> a -> a
+myPow x 0 = 1
+myPow x 1 = x
+myPow x n = x*(myPow x (n-1))
+
+--digitSum :: Integral a => a -> a
+digitSum x = sum $ map digitToInt $ show x