Gender in English Agr

This commit is contained in:
aarne committed 2008-04-21 15:56:50 +00:00
1 parent d1b9f03fe4
commit 8b118840b4
11 files changed
+68 -40

No files matched your search

+1 -1
View File
@@ -11,7 +11,7 @@ concrete SentenceEng of Sentence = CatEng ** open Prelude, ResEng in {
ImpVP vp = {
s = \\pol,n =>
let
agr = {n = numImp n ; p = P2} ;
agr = {n = numImp n ; p = P2 ; g = Masc} ;
verb = infVP True vp agr ;
dont = case pol of {
CNeg True => "don't" ;