mirror of
https://github.com/GrammaticalFramework/comp-syntax-gu-mlt.git
synced 2026-02-10 07:11:06 -07:00
finished livecoding agreement
This commit is contained in:
@@ -10,6 +10,14 @@ param
|
||||
NPAgreement = NPAgr Number Definite Gender ;
|
||||
|
||||
oper
|
||||
nform2number : NForm -> Number = \nf -> case nf of {
|
||||
(NF n _ _) => n
|
||||
} ;
|
||||
|
||||
nform2definite : NForm -> Definite = \nf -> case nf of {
|
||||
(NF _ d _) => d
|
||||
} ;
|
||||
|
||||
-- Noun = {s : Number => Definite => Case => Str ; g : Gender} ;
|
||||
Noun = {s : NForm => Str ; g : Gender} ;
|
||||
|
||||
|
||||
Reference in New Issue
Block a user