diff options
Diffstat (limited to 'src/AST/Weaken.hs')
| -rw-r--r-- | src/AST/Weaken.hs | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/src/AST/Weaken.hs b/src/AST/Weaken.hs index 56b7a74..dd121fa 100644 --- a/src/AST/Weaken.hs +++ b/src/AST/Weaken.hs @@ -18,6 +18,7 @@ data env :> env' where WCopy :: env :> env' -> (t : env) :> (t : env') WPop :: (t : env) :> env' -> env :> env' WThen :: env1 :> env2 -> env2 :> env3 -> env1 :> env3 + WClosed :: '[] :> env deriving instance Show (env :> env') (.>) :: env2 :> env3 -> env1 :> env2 -> env1 :> env3 |