mirror of
https://github.com/GrammaticalFramework/gf-rgl.git
synced 2026-05-27 17:08:54 -06:00
added dummy implementations for DAP and DetDAP
This commit is contained in:
@@ -51,7 +51,7 @@ concrete CatFin of Cat = CommonX ** open ResFin, StemFin, Prelude in {
|
|||||||
CN = {s : NForm => Str ; h : Harmony} ;
|
CN = {s : NForm => Str ; h : Harmony} ;
|
||||||
Pron = {s : NPForm => Str ; a : Agr ; hasPoss : Bool ; poss : Str} ;
|
Pron = {s : NPForm => Str ; a : Agr ; hasPoss : Bool ; poss : Str} ;
|
||||||
NP = {s : NPForm => Str ; a : Agr ; isPron : Bool ; isNeg : Bool} ;
|
NP = {s : NPForm => Str ; a : Agr ; isPron : Bool ; isNeg : Bool} ;
|
||||||
Det = {
|
DAP, Det = {
|
||||||
s1 : Case => Str ; -- minun kolme
|
s1 : Case => Str ; -- minun kolme
|
||||||
s2 : Harmony => Str ; -- -ni (Front for -nsä, Back for -nsa)
|
s2 : Harmony => Str ; -- -ni (Front for -nsä, Back for -nsa)
|
||||||
sp : Case => Str ; -- se (substantival form)
|
sp : Case => Str ; -- se (substantival form)
|
||||||
|
|||||||
@@ -264,6 +264,7 @@ concrete NounFin of Noun = CatFin ** open ResFin, MorphoFin, StemFin, Prelude in
|
|||||||
isPron = False ; isNeg = det.isNeg
|
isPron = False ; isNeg = det.isNeg
|
||||||
} ;
|
} ;
|
||||||
|
|
||||||
|
DetDAP d = d ;
|
||||||
|
|
||||||
oper
|
oper
|
||||||
numN : NForm -> Number = \nf -> case nf of {
|
numN : NForm -> Number = \nf -> case nf of {
|
||||||
|
|||||||
Reference in New Issue
Block a user