summaryrefslogtreecommitdiff
path: root/files/practicum
diff options
context:
space:
mode:
authorCamil Staps2015-03-02 13:58:22 +0100
committerCamil Staps2015-03-02 13:58:22 +0100
commitbee9e3d3599389dcafab90a2b0ae9ceedc30de97 (patch)
treea545cf750b0ba91687825fefe99138bf330fc1bd /files/practicum
parentUpdated w3 to let maximum have O(1) (diff)
6.3
Diffstat (limited to 'files/practicum')
-rw-r--r--files/practicum/StdSet.icl24
1 files changed, 22 insertions, 2 deletions
diff --git a/files/practicum/StdSet.icl b/files/practicum/StdSet.icl
index b152f37..6cad7f1 100644
--- a/files/practicum/StdSet.icl
+++ b/files/practicum/StdSet.icl
@@ -1,5 +1,25 @@
-implementation module StdSet
+definition module StdSet
-import StdEnv
+import StdClass
:: Set a
+
+toSet :: [a] -> Set a | Eq a
+fromSet :: (Set a) -> [a]
+
+isEmptySet :: (Set a) -> Bool
+isDisjoint :: (Set a) (Set a) -> Bool | Eq a
+isSubset :: (Set a) (Set a) -> Bool | Eq a
+isStrictSubset :: (Set a) (Set a) -> Bool | Eq a
+memberOfSet :: a (Set a) -> Bool | Eq a
+union :: (Set a) (Set a) -> Set a | Eq a
+intersection :: (Set a) (Set a) -> Set a | Eq a
+nrOfElements :: (Set a) -> Int
+without :: (Set a) (Set a) -> Set a | Eq a
+
+product :: (Set a) (Set b) -> Set (a,b)
+
+instance zero (Set a)
+instance == (Set a) | Eq a
+
+powerSet :: (Set a) -> Set (Set a)