remove old parse dir
This commit is contained in:
parent
9eaaca4ed2
commit
2c380ad564
|
@ -1,4 +0,0 @@
|
||||||
open Raw
|
|
||||||
|
|
||||||
module A = AbsImplicitt
|
|
||||||
module R = RawSyntax
|
|
|
@ -1,12 +0,0 @@
|
||||||
(library
|
|
||||||
(name Parse)
|
|
||||||
(libraries Raw)
|
|
||||||
(flags (:standard -w -27 -w -39 -w -33)))
|
|
||||||
|
|
||||||
(rule
|
|
||||||
(deps "implicitt.cf")
|
|
||||||
(targets AbsImplicitt.ml BNFC_Util.ml LexImplicitt.mll ParImplicitt.mly PrintImplicitt.ml ShowImplicitt.ml SkelImplicitt.ml TestImplicitt.ml)
|
|
||||||
(action (run bnfc --ocaml %{deps})))
|
|
||||||
|
|
||||||
(ocamllex LexImplicitt)
|
|
||||||
(ocamlyacc ParImplicitt)
|
|
|
@ -1,62 +0,0 @@
|
||||||
entrypoints [Def], Term;
|
|
||||||
|
|
||||||
token Id ((letter|digit|["[]_"])+) ;
|
|
||||||
|
|
||||||
comment "--" ;
|
|
||||||
comment "{-" "-}" ;
|
|
||||||
|
|
||||||
Defn. Def ::= "def" Id ":" Term ":=" Term;
|
|
||||||
separator nonempty Def "" ;
|
|
||||||
|
|
||||||
-- names bound by lambdas
|
|
||||||
NImp. Name ::= "{" Id "}";
|
|
||||||
NExp. Name ::= Id;
|
|
||||||
separator nonempty Name "" ;
|
|
||||||
|
|
||||||
-- Term 3
|
|
||||||
TType. Term3 ::= "Type";
|
|
||||||
|
|
||||||
TT0. Term3 ::= "𝟘";
|
|
||||||
TInd0. Term3 ::= "𝟘-elim";
|
|
||||||
|
|
||||||
TT1. Term3 ::= "𝟙";
|
|
||||||
TT1tr. Term3 ::= "★";
|
|
||||||
|
|
||||||
TBool. Term3 ::= "𝟚";
|
|
||||||
TTrue. Term3 ::= "true";
|
|
||||||
TFalse. Term3 ::= "false";
|
|
||||||
TIndB. Term3 ::= "𝟚-elim";
|
|
||||||
|
|
||||||
TNat. Term3 ::= "ℕ";
|
|
||||||
TZero. Term3 ::= "0";
|
|
||||||
TSuc. Term3 ::= "suc";
|
|
||||||
TIndN. Term3 ::= "ℕ-elim";
|
|
||||||
|
|
||||||
TFst. Term3 ::= "pr₁";
|
|
||||||
TSnd. Term3 ::= "pr₂";
|
|
||||||
|
|
||||||
TLam. Term3 ::= "λ" [Name] "." Term;
|
|
||||||
|
|
||||||
TVar. Term3 ::= Id;
|
|
||||||
|
|
||||||
-- Term2
|
|
||||||
|
|
||||||
TAppEx. Term2 ::= Term2 Term3;
|
|
||||||
TAppIm. Term2 ::= Term2 "{" Term "}";
|
|
||||||
|
|
||||||
-- Term1
|
|
||||||
TPiAr. Term1 ::= Term2 "→" Term1;
|
|
||||||
TSgCr. Term1 ::= Term2 "×" Term1;
|
|
||||||
|
|
||||||
-- Term0
|
|
||||||
TLet. Term ::= "let" Id ":" Term ":=" Term "in" Term ;
|
|
||||||
|
|
||||||
TPiEx. Term ::= "(" Id ":" Term ")" "→" Term;
|
|
||||||
TPiIm. Term ::= "{" Id ":" Term "}" "→" Term;
|
|
||||||
|
|
||||||
TSg. Term ::= "(" Id ":" Term ")" "×" Term;
|
|
||||||
TPair. Term ::= "⟨" Term "," Term "⟩";
|
|
||||||
|
|
||||||
THole. Term ::= "?";
|
|
||||||
|
|
||||||
coercions Term 3;
|
|
Loading…
Reference in New Issue
Block a user