Emil Djupfeldt's correction to PhrasebookGer

This commit is contained in:
aarne
2012-05-08 12:10:36 +00:00
parent a6800fc0da
commit dcbb31cae2

View File

@@ -43,8 +43,8 @@ concrete SentencesGer of Sentences = NumeralGer ** SentencesI -
-- the new things -- the new things
lin lin
ADoVerbPhrase p vp = prop (mkCl p.name vp) ; ADoVerbPhrase p vp = prop (mkCl p.name vp) ;
AModVerbPrase m p vp = prop (mkCl p.name (mkVP m vp)) ; AModVerbPhrase m p vp = prop (mkCl p.name (mkVP m vp)) ;
ADoVerbPhrasePlace p vp x = prop (mkCl p.name (mkVP vp x.at)) ; ADoVerbPhrasePlace p vp x = prop (mkCl p.name (mkVP vp x.at)) ;
AModVerbPrasePlace m p vp x = prop (mkCl p.name (mkVP m (mkVP vp x.at))) ; AModVerbPhrasePlace m p vp x = prop (mkCl p.name (mkVP m (mkVP vp x.at))) ;
YouPlurPolMale, YouPlurPolFemale = mkPerson youPol_Pron ; YouPlurPolMale, YouPlurPolFemale = mkPerson youPol_Pron ;
} }