20'

tianyicui · Nov 20, 2010 · afe5f22 · afe5f22
1 parent d26feed
commit afe5f22
Showing 1 changed file with 2 additions and 0 deletions.
diff --git a/20.hs b/20.hs
@@ -3,3 +3,5 @@ removeAt n (x:xs)
     | otherwise =
       let (y,ys) = (removeAt (n-1) xs)
       in (y,x:ys)
+
+removeAt' n xs = (xs !! (n-1), take (n-1) xs ++ drop n xs)