Scharolta's DictionaryGer fixes

This commit is contained in:
aarne
2014-05-29 12:06:44 +00:00
parent 159becdd02
commit c18ac43a15
5 changed files with 1227 additions and 7983 deletions
+1 -1
View File
@@ -18,7 +18,7 @@ oper
-- For $StructuralGer$.
mkPrep : Str -> PCase -> Preposition = \s,c ->
{s = s ; c = c ; isPrep = True} ;
{s = s ; s2 = [] ; c = c ; isPrep = True} ;
nameNounPhrase : {s : Case => Str} -> {s : PCase => Str ; a : Agr ; isPron : Bool} = \name -> heavyNP {
s = \\c => usePrepC c (\k -> name.s ! k) ;