From a9ee47b61558efe09aee23f5671aabd0c3747e8a Mon Sep 17 00:00:00 2001 From: Joe Zhao Date: Tue, 17 Mar 2015 11:05:29 +0800 Subject: p -> h --- p3.hs | 7 ------- 1 file changed, 7 deletions(-) delete mode 100644 p3.hs (limited to 'p3.hs') diff --git a/p3.hs b/p3.hs deleted file mode 100644 index 7c8604d..0000000 --- a/p3.hs +++ /dev/null @@ -1,7 +0,0 @@ -elementAt :: [a] -> Integer -> Maybe a - -elementAt [] _ = Nothing -elementAt (x:xs) 1 = Just x -elementAt (x:xs) n - | n>1 = elementAt xs (n-1) - | otherwise = Nothing -- cgit v1.2.3-70-g09d2