aboutsummaryrefslogtreecommitdiff
path: root/src/Language/Mili/Reducer.hs
diff options
context:
space:
mode:
Diffstat (limited to 'src/Language/Mili/Reducer.hs')
-rw-r--r--src/Language/Mili/Reducer.hs9
1 files changed, 6 insertions, 3 deletions
diff --git a/src/Language/Mili/Reducer.hs b/src/Language/Mili/Reducer.hs
index a65e018..8074bdf 100644
--- a/src/Language/Mili/Reducer.hs
+++ b/src/Language/Mili/Reducer.hs
@@ -1,9 +1,12 @@
+-- MIT License, Copyright (c) 2024 Marvin Borner
+
module Language.Mili.Reducer
( nf
) where
-import Data.Mili ( Term(..) )
-
+import Data.Mili ( Nat(..)
+ , Term(..)
+ )
-- | Reduce term to normal form
nf :: Term -> Term
-nf m = m
+nf t = t