diff options
author | Camil Staps | 2016-02-02 19:24:50 +0100 |
---|---|---|
committer | Camil Staps | 2016-02-02 19:24:50 +0100 |
commit | a7d7542dc646a5fd124ef71e71ce260889f1701b (patch) | |
tree | 04ed89503bbb3cc9933273a1326a53ca724c3492 /1415/files/practicum/PropositieLogica2.dcl | |
parent | week6 camil: working positioning of lines by putting empties at left and righ... (diff) |
Diffstat (limited to '1415/files/practicum/PropositieLogica2.dcl')
-rw-r--r-- | 1415/files/practicum/PropositieLogica2.dcl | 21 |
1 files changed, 21 insertions, 0 deletions
diff --git a/1415/files/practicum/PropositieLogica2.dcl b/1415/files/practicum/PropositieLogica2.dcl new file mode 100644 index 0000000..555022f --- /dev/null +++ b/1415/files/practicum/PropositieLogica2.dcl @@ -0,0 +1,21 @@ +definition module PropositieLogica2
+
+import StdEnv
+
+// Definitie PropL moet gekopieerd worden uit PropositieLogica2.icl
+:: PropL = Waar // logische waarheid
+ | Onwaar // logische onwaarheid
+ | Niet PropL // ontkenning van een term
+ | En PropL PropL // logische conjunctie
+ | Of PropL PropL // logische disjunctie
+ | Var Ident // variabele v met gegeven index i
+:: Ident :== Int // variabelen hebben een index i (> 0)
+:: Valuatie // valuatie van variabelen naar booleans
+
+instance toString PropL
+
+eval1 :: PropL -> Bool
+eval2 :: Valuatie PropL -> Bool
+vars :: PropL -> [Ident]
+vals :: [Ident] -> [Valuatie]
+truths :: PropL -> [Valuatie]
|