support for measurement units

This commit is contained in:
Krasimir Angelov
2023-07-25 19:38:43 +02:00
parent 5d912f78a4
commit 22a168198b
39 changed files with 198 additions and 4 deletions

View File

@@ -1,4 +1,4 @@
concrete CommonX of Common = open (R = ParamX) in {
concrete CommonX of Common = open (R = ParamX), Prelude in {
lincat
Text = {s : Str} ;
@@ -20,4 +20,6 @@ concrete CommonX of Common = open (R = ParamX) in {
Ant = {s : Str ; a : R.Anteriority} ;
Pol = {s : Str ; p : R.Polarity} ;
MU = {s : Str ; isPre : Bool} ;
}