This commit is contained in:
Krasimir Angelov
2018-06-19 18:02:46 +02:00
2 changed files with 5 additions and 1 deletions

View File

@@ -161,6 +161,9 @@ concrete ExtraFin of ExtraFinAbs = CatFin **
CompPartAP ap = {
s = \\agr => ap.s ! False ! NCase (complNumAgr agr) ResFin.Part
} ;
CompNomAP ap = {
s = \\agr => ap.s ! False ! NCase (complNumAgr agr) ResFin.Nom
} ;
---- copied from VerbFin.CompAP, should be shared
ICompAP ap = {

View File

@@ -28,7 +28,8 @@ abstract ExtraFinAbs = Extra [
vai_Conj : Conj ; -- minä vai sinä? ("or" in question)
CompPartAP : AP -> Comp ; -- kahvi on valmista
CompPartAP : AP -> Comp ; -- kahvi on valmista: partitive complement also in singular
CompNomAP : AP -> Comp ; -- kengät ovat mustat: nominative complement also in plural
ProDropPoss : Pron -> Quant ; -- vaimoni