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

(Som) Make relational nouns into Prep w/ possPrep

Browse Source
This commit is contained in:
Inari Listenmaa
2019-08-27 12:32:42 +02:00
parent db8356aa49
commit bcb4812f10
6 changed files with 74 additions and 34 deletions
Download Patch File Download Diff File Expand all files Collapse all files

23
src/somali/StructuralSom.gf
View File

@@ -55,11 +55,10 @@ lin or_Conj = {s2 = \\_ => "ama" ; s1 = [] ; n = Sg} ; -- mise with interrogativ
--lin how8many_IDet = R.indefDet "" pl ;
lin all_Predet = {s = "giddi" ; isPoss = True ; da = M GA} ;
--lin not_Predet = { s = "" } ;
--lin only_Predet = { s = "" } ;
lin most_Predet = {s = "badi" ; isPoss = True ; da = F DA} ;
{-
lin not_Predet = { s = "" } ;
lin only_Predet = { s = "" } ;
lin most_Predet = { s = "" } ;
lin every_Det = R.defDet [] pl **
{ s = mkVow } ;
lin few_Det = R.indefDet "" pl ;
@@ -67,12 +66,12 @@ lin many_Det = R.indefDet "" pl ;
lin much_Det = R.indefDet "" sg ;
-}
lin somePl_Det = {
sp = \\_,_ => "qaar" ;
isPoss, isNum = False ;
st = Definite ; -- NB. Indefinite means actually only IndefArt.
n = Pl ;
s = \\x,_ => BIND ++ defStems ! x ++ BIND ++ "a qaarkood" ;
shortPoss = \\x => BIND ++ defStems ! x ++ BIND ++ "a qaarkood" ;
sp = \\_,_ => "qaarkood" ;
isPoss, isNum = False ;
n = Pl ;
st = Definite -- NB. Indefinite is really only reserved for IndefArt NumSg.
} ;
lin someSg_Det = somePl_Det ** {
@@ -82,8 +81,7 @@ lin someSg_Det = somePl_Det ** {
F x => \\_ => BIND ++ defStems ! F x ++ BIND ++ "a qaarkeed" } ;
shortPoss = table {
M x => BIND ++ defStems ! M x ++ BIND ++ "a qaarkiis" ;
F x => BIND ++ defStems ! F x ++ BIND ++ "a qaarkeed" } ;
sp = \\g,c => case g of {Fem => "qaarkeed" ; _ => "qaarkiis"}
F x => BIND ++ defStems ! F x ++ BIND ++ "a qaarkeed" }
} ;
@@ -115,7 +113,7 @@ lin above_Prep = mkPrep (mkPrep ka) [] [] "dul" ;
-- lin after_Prep = mkPrep "" ;
-- lin before_Prep = mkPrep "" ;
-- lin behind_Prep = mkPrep "" ;
-- lin between_Prep = mkPrep "" ;
lin between_Prep = possPrep dhex_N ;
-- lin by8agent_Prep = mkPrep ;
-- lin by8means_Prep = mkPrep ;
-- lin during_Prep = mkPrep ;
@@ -188,4 +186,7 @@ lin want_VV = mkV "" ;
lin please_Voc = ss "" ;
-}
oper
dhex_N : N = let dhex : N = mkN "dhex" in dhex ** {gda = FM DA HA} ;
}