diff options
author | Malte Voos <git@mal.tc> | 2024-02-19 12:57:26 +0100 |
---|---|---|
committer | Malte Voos <git@mal.tc> | 2024-02-19 16:54:45 +0100 |
commit | 407a2a4a0a440c41adc19fbe8b67283b7b7c65ab (patch) | |
tree | c55ed80f1a90741e547c0b3fa102f5f709aa1836 /lib/Syntax.ml | |
parent | 169ff6c0d196246e28c4413b43895ad5a377a2e5 (diff) | |
download | toytt-407a2a4a0a440c41adc19fbe8b67283b7b7c65ab.tar.gz toytt-407a2a4a0a440c41adc19fbe8b67283b7b7c65ab.zip |
core syntax, semantic domain, evaluation
Diffstat (limited to 'lib/Syntax.ml')
-rw-r--r-- | lib/Syntax.ml | 19 |
1 files changed, 19 insertions, 0 deletions
diff --git a/lib/Syntax.ml b/lib/Syntax.ml new file mode 100644 index 0000000..6cd988a --- /dev/null +++ b/lib/Syntax.ml @@ -0,0 +1,19 @@ +type tm = + | Var of int + | Pi of tm * (* BINDS *) tm + | Lam of (* BINDS *) tm + | App of tm * tm + | Sg of tm * (* BINDS *) tm + | Pair of tm * tm + | Fst of tm + | Snd of tm + | Type + | Bool + | True + | False + | BoolElim of { + motive : (* BINDS *) tm; + true_case : tm; + false_case : tm; + scrut : tm; + } |