diff options
Diffstat (limited to 'lib/Domain.ml')
-rw-r--r-- | lib/Domain.ml | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/lib/Domain.ml b/lib/Domain.ml index cf07a4b..88560c2 100644 --- a/lib/Domain.ml +++ b/lib/Domain.ml @@ -25,3 +25,7 @@ and frame = and env = value bwd and clos = Clos of { body : Syntax.tm; env : env } + +type cell = { tm : value; tp : value } + +let var i = Neutral (Var i, Bwd.Emp) |