(Kor) Add UsePron and PossPron, minor fix in i_Pron
This commit is contained in:
1 parent
4e701884db
commit
a18ffbe232
3 files changed
+4
-7
No files matched your search
@@ -27,7 +27,7 @@ concrete NounKor of Noun = CatKor ** open ResKor, Prelude in {
|
||||
-- } ;
|
||||
|
||||
-- : Pron -> NP ;
|
||||
-- UsePron pron = pron ;
|
||||
UsePron pron = pron ** {empty = []};
|
||||
|
||||
-- : Predet -> NP -> NP ; -- only the man
|
||||
PredetNP predet np = np ** {s =
|
||||
@@ -130,10 +130,7 @@ concrete NounKor of Noun = CatKor ** open ResKor, Prelude in {
|
||||
IndefArt = mkQuant [] [] ;
|
||||
|
||||
-- : Pron -> Quant
|
||||
-- PossPron pron =
|
||||
-- let p = pron.poss ;
|
||||
-- in DefArt ** {
|
||||
-- } ;
|
||||
PossPron pron = pron.poss ;
|
||||
|
||||
--2 Common nouns
|
||||
|
||||
|
||||
Reference in new issue
Block a user