(Hun) Update worst-case mkN with P1Sg possessive form of the noun

This commit is contained in:
Inari Listenmaa
2020-06-04 08:19:29 +02:00
parent 1471ee563e
commit ab83883679
3 changed files with 7 additions and 6 deletions

View File

@@ -135,8 +135,8 @@ oper
mkN : (x1,_,_,x4 : Str) -> N =
\n,a,pln,possd -> lin N (regNoun4 n a pln possd) ;
mkN : (x1,_,_,_,_,_,_,x8 : Str) -> N =
\a,b,c,d,e,f,g,h -> lin N (worstCaseNoun a b c d e f g h (getHarm a)) ;
mkN : (x1,_,_,_,_,_,_,_,x9 : Str) -> N =
\a,b,c,d,e,f,g,h,i -> lin N (worstCaseNoun a b c d e f g h i (getHarm a)) ;
mkN : Str -> Harmony -> N =
\s,h -> lin N (mkNounHarm h (pluralAllomorph s) s) ;