From a9ee47b61558efe09aee23f5671aabd0c3747e8a Mon Sep 17 00:00:00 2001 From: Joe Zhao Date: Tue, 17 Mar 2015 11:05:29 +0800 Subject: p -> h --- p7.hs | 5 ----- 1 file changed, 5 deletions(-) delete mode 100644 p7.hs (limited to 'p7.hs') diff --git a/p7.hs b/p7.hs deleted file mode 100644 index c67b5c5..0000000 --- a/p7.hs +++ /dev/null @@ -1,5 +0,0 @@ -data NestedList a = Elem a | List [NestedList a] - -myFlatten :: NestedList a -> [a] -myFlatten (Elem x) = [x] -myFlatten (List x) = concatMap myFlatten x -- cgit v1.2.3-70-g09d2