summaryrefslogtreecommitdiffstats
path: root/StackSet.hs
diff options
context:
space:
mode:
authorDon Stewart <dons@cse.unsw.edu.au>2007-03-09 10:13:28 +0100
committerDon Stewart <dons@cse.unsw.edu.au>2007-03-09 10:13:28 +0100
commit1ae4c3df6eb95a0f26daec63fca49b0013f7e4b6 (patch)
treee01db9ad657e9d2be02c9fd3bfeb4fbcf5d25b66 /StackSet.hs
parentec5984253812ada01e6f7023810c37ba769ba601 (diff)
downloadmetatile-1ae4c3df6eb95a0f26daec63fca49b0013f7e4b6.tar
metatile-1ae4c3df6eb95a0f26daec63fca49b0013f7e4b6.zip
unnec. export list
darcs-hash:20070309091328-9c5c1-38188ec996d52e28a3c0a0926ea07944dc21b016
Diffstat (limited to 'StackSet.hs')
-rw-r--r--StackSet.hs25
1 files changed, 1 insertions, 24 deletions
diff --git a/StackSet.hs b/StackSet.hs
index 9cb7cdb..15788bc 100644
--- a/StackSet.hs
+++ b/StackSet.hs
@@ -19,30 +19,7 @@
-- may be on only 1 screen at any given time.
--
-module StackSet (
- StackSet, -- abstract
-
- -- * Introduction and elimination
- empty, -- :: Int -> StackSet a
- fromList, -- :: Ord a => (Int,[[a]]) -> StackSet a
- toList, -- :: StackSet a -> (Int,[[a]])
- index, -- :: Int -> StackSet a -> [a]
- current, -- :: StackSet a -> Int
-
- -- * Queries
- member, -- :: Ord a => a -> StackSet a -> Bool
- size, -- :: StackSet a -> Int
- peek, -- :: StackSet a -> Maybe a
-
- -- * Modifcations
- push, -- :: Ord a => a -> StackSet a -> StackSet a
- view, -- :: Int -> StackSet a -> StackSet a
- rotate, -- :: Ordering -> StackSet a -> StackSet a
- shift, -- :: Ord a => Int -> StackSet a -> StackSet a
- insert, -- :: Ord a => a -> Int -> StackSet a -> StackSet a
- delete, -- :: Ord a => a -> StackSet a -> StackSet a
-
- ) where
+module StackSet where
import Data.Maybe
import qualified Data.List as L (delete)