mirror of
https://github.com/GrammaticalFramework/gf-rgl.git
synced 2026-06-24 02:31:10 -06:00
the names API in more languages
This commit is contained in:
@@ -1,7 +1,21 @@
|
||||
concrete CatRus of Cat = CommonX ** open ResRus, Prelude in {
|
||||
flags coding=utf8 ; optimize=all ;
|
||||
lincat
|
||||
N, GN, SN, LN, PN = ResRus.NounForms ;
|
||||
N, PN = ResRus.NounForms ;
|
||||
GN = {
|
||||
s : Case => Str ;
|
||||
g : Sex ;
|
||||
} ;
|
||||
SN = {
|
||||
s : Sex => Case => Str ;
|
||||
p : Case => Str ;
|
||||
} ;
|
||||
LN = {
|
||||
s : Case => Str ;
|
||||
g : Gender ;
|
||||
n : Number ;
|
||||
anim : Animacy
|
||||
} ;
|
||||
N2 = ResRus.Noun2Forms ;
|
||||
N3 = ResRus.Noun3Forms ;
|
||||
|
||||
@@ -105,7 +119,7 @@ lincat
|
||||
linref
|
||||
N = \s -> s.snom ;
|
||||
PN = \s -> s.snom ;
|
||||
LN = \s -> s.snom ;
|
||||
LN = \s -> s.s ! Nom ;
|
||||
Pron = \s -> s.nom ;
|
||||
N2 = \s -> s.snom ++ s.c2.s ;
|
||||
N3 = \s -> s.snom ++ s.c2.s ++ s.c3.s ;
|
||||
|
||||
Reference in New Issue
Block a user