mirror of
https://github.com/GrammaticalFramework/gf-core.git
synced 2026-06-02 22:58:54 -06:00
parametrized participle-clitic agreement
This commit is contained in:
@@ -40,16 +40,16 @@ resource CommonRomance = ParamRomance ** open Prelude in {
|
||||
|
||||
appVPAgr : VPAgr -> AAgr -> AAgr = \vp,agr ->
|
||||
case vp of {
|
||||
VPAgrNone => aagr Masc Sg ;
|
||||
VPAgrSubj => agr ;
|
||||
VPAgrClit a => a
|
||||
} ;
|
||||
|
||||
vpAgrNone : VPAgr = VPAgrClit (aagr Masc Sg) ;
|
||||
|
||||
param
|
||||
VPAgr =
|
||||
VPAgrNone -- elle a dormi
|
||||
| VPAgrSubj -- elle est partie, elle s'est vue
|
||||
| VPAgrClit -- elle les a vues
|
||||
VPAgrSubj -- elle est partie, elle s'est vue
|
||||
| VPAgrClit -- elle a dormi; elle les a vues
|
||||
{g : Gender ; n : Number} ;
|
||||
|
||||
}
|
||||
|
||||
Reference in New Issue
Block a user