diff options
Diffstat (limited to 'src/GF/Data')
| -rw-r--r-- | src/GF/Data/Utilities.hs | 5 |
1 files changed, 0 insertions, 5 deletions
diff --git a/src/GF/Data/Utilities.hs b/src/GF/Data/Utilities.hs index d7e6be2f0..50d1f5195 100644 --- a/src/GF/Data/Utilities.hs +++ b/src/GF/Data/Utilities.hs @@ -34,11 +34,6 @@ lookupList a [] = [] lookupList a (p:ps) | a == fst p = snd p : lookupList a ps | otherwise = lookupList a ps --- | Find the first list in a list of lists --- which contains the argument. -findSet :: Eq c => c -> [[c]] -> Maybe [c] -findSet x = find (x `elem`) - split :: [a] -> ([a], [a]) split (x : y : as) = (x:xs, y:ys) where (xs, ys) = split as |