X-Git-Url: https://git.stderr.nl/gitweb?a=blobdiff_plain;f=Constants.hs;h=af8c324b300e2f52aae2ca36f8a42960e6fde837;hb=3b0ce3044e2c62906a4b26cd7e1b004fea88c21e;hp=37eb0a79c60ee99e7e37257bc1d24e37c5e4939a;hpb=a0c01abba26d4c00428d340d068f87a84afbc917;p=matthijs%2Fmaster-project%2Fc%CE%BBash.git

diff --git a/Constants.hs b/Constants.hs
index 37eb0a7..af8c324 100644
--- a/Constants.hs
+++ b/Constants.hs
@@ -95,8 +95,8 @@ lengthId = "length"
 
 
 -- | isnull (function null in original Haskell source) function identifier
-isnullId :: String
-isnullId = "isnull"
+nullId :: String
+nullId = "null"
 
 
 -- | replace function identifier
@@ -149,18 +149,62 @@ rotlId = "rotl"
 rotrId :: String
 rotrId = "rotr"
 
+-- | concatenate the vectors in a vector
+concatId :: String
+concatId = "concat"
+
 -- | reverse function identifier
 reverseId :: String
 reverseId = "reverse"
 
+-- | iterate function identifier
+iterateId :: String
+iterateId = "iterate"
+
+-- | iteraten function identifier
+iteratenId :: String
+iteratenId = "iteraten"
+
+-- | iterate function identifier
+generateId :: String
+generateId = "generate"
+
+-- | iteraten function identifier
+generatenId :: String
+generatenId = "generaten"
+
 -- | copy function identifier
 copyId :: String
 copyId = "copy"
 
+-- | copyn function identifier
+copynId :: String
+copynId = "copyn"
+
 -- | map function identifier
 mapId :: String
 mapId = "map"
 
+-- | zipwith function identifier
+zipWithId :: String
+zipWithId = "zipWith"
+
+-- | foldl function identifier
+foldlId :: String
+foldlId = "foldl"
+
+-- | foldr function identifier
+foldrId :: String
+foldrId = "foldr"
+
+-- | zip function identifier
+zipId :: String
+zipId = "zip"
+
+-- | unzip function identifier
+unzipId :: String
+unzipId = "unzip"
+
 -- | hwxor function identifier
 hwxorId :: String
 hwxorId = "hwxor"
@@ -177,6 +221,8 @@ hwnotId = "hwnot"
 hwandId :: String
 hwandId = "hwand"
 
+lengthTId :: String
+lengthTId = "lengthT"
 
 ------------------
 -- VHDL type marks