msyds/gf-rgl
1
0
Fork 0
forked from GitHub/gf-rgl
Code Pull Requests Activity

added mkVV, mkAdV, mkAdA

Browse Source
This commit is contained in:
krangelov
2019-04-10 14:04:07 +02:00
parent d739f8c222
commit 5829c2b1e1
1 changed files with 9 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

9
src/thai/ParadigmsTha.gf
View File

@@ -64,6 +64,9 @@ oper
= \v,p,q -> lin V3 (v ** {c2 = p ; c3 = q}) ;
} ;
mkVV : Str -> VV =
\s -> lin VV {s=s; typ=VVPre} ;
mkVQ : V -> VQ =
\v -> lin VQ v ;
@@ -88,6 +91,12 @@ oper
mkAdv : Str -> Adv =
\s -> lin Adv (ss s) ;
mkAdV : Str -> AdV =
\s -> lin AdV (ss s) ;
mkAdA : Str -> AdA =
\s -> lin AdA (ss s) ;
mkPrep : Str -> Prep =
\s -> lin Prep (ss s) ;