GitHub/gf-rgl
1
0
Fork 1
mirror of https://github.com/GrammaticalFramework/gf-rgl.git synced 2026-06-24 10:41:15 -06:00
Code Issues Packages Projects Releases Wiki Activity

handle the full definitive article with Masc nouns

Browse Source
This commit is contained in:
Krasimir Angelov
2023-08-29 15:08:45 +02:00
parent 819d4f19ed
commit b72ea1e2f1
4 changed files with 43 additions and 14 deletions
Download Patch File Download Diff File Expand all files Collapse all files

29
src/bulgarian/NamesBul.gf
View File

@@ -36,9 +36,18 @@ lin FullName gn sn = {
p = NounP3 Pos
} ;
lin UseLN, PlainLN = \n -> {
s = table { RObj c => linCase c Pos ++ n.s ! Def ;
_ => n.s ! Def
lin UseLN = \n -> {
s = table { RSubj => n.defNom ;
RObj c => linCase c Pos ++ n.s ! Def ;
RVoc => n.s ! Indef
} ;
gn = n.gn ;
p = NounP3 Pos
} ;
lin PlainLN = \n -> {
s = table { RObj c => linCase c Pos ++ n.s ! Indef ;
_ => n.s ! Indef
} ;
gn = n.gn ;
p = NounP3 Pos
@@ -53,10 +62,16 @@ lin UseLN, PlainLN = \n -> {
} ;
AdjLN ap n = n ** {
s = \\sp => case ap.isPre of {
True => ap.s ! aform n.gn sp RSubj ! P3 ++ n.s ! Indef ;
False => n.s ! sp ++ ap.s ! aform n.gn sp RSubj ! P3
}
s = \\sp => case <ap.isPre,n.hasArt> of {
<True,True > => ap.s ! aform n.gn sp RSubj ! P3 ++ n.s ! Indef ;
<True,False> => ap.s ! aform n.gn Indef RSubj ! P3 ++ n.s ! Indef ;
<False,_> => n.s ! sp ++ ap.s ! aform n.gn Indef RSubj ! P3
} ;
defNom = case <ap.isPre,n.hasArt> of {
<True,True > => ap.s ! ASgMascDefNom ! P3 ++ n.s ! Indef ;
<True,False> => ap.s ! aform n.gn Indef RSubj ! P3 ++ n.s ! Indef ;
<False,_> => n.defNom ++ ap.s ! aform n.gn Indef RSubj ! P3
} ;
} ;
}