extensions from Codex

This commit is contained in:
Krasimir Angelov committed 2026-10-20 09:32:00 +02:00
1 parent ef9dd1ca40
commit 4e259e4150
15 files changed
+239 -31

No files matched your search

+10 -1
View File
@@ -5,7 +5,7 @@ flags coding = utf8 ;
oper
mkN = overload {
mkN : Str -> N
= \s -> lin N {s = s ; c = "กำ ลัง"} ; ---- for small objects, see LP PB p. 20
= \s -> lin N {s = s ; c = "อัน"} ; ---- general classifier
mkN : Str -> Str -> N
= \s,c -> lin N {s = s ; c = c} ;
} ;
@@ -67,6 +67,15 @@ oper
mkVV : Str -> VV =
\s -> lin VV {s=s; typ=VVPre} ;
mkVVPre : Str -> VV =
\s -> lin VV {s=s; typ=VVPre} ;
mkVVMid : Str -> VV =
\s -> lin VV {s=s; typ=VVMid} ;
mkVVPost : Str -> VV =
\s -> lin VV {s=s; typ=VVPost} ;
mkVQ : V -> VQ =
\v -> lin VQ v ;