forked from GitHub/gf-rgl
(Som) Words + new unit test for VS + minor cleanup
This commit is contained in:
@@ -12,12 +12,9 @@ lin
|
||||
|
||||
-- : Prep -> NP -> Adv ;
|
||||
PrepNP prep np = prep ** {
|
||||
-- s = [] ;
|
||||
|
||||
np = case prep.isPoss of {
|
||||
True => nplite emptyNP ;
|
||||
False => nplite np } ;
|
||||
|
||||
miscAdv = case prep.isPoss of {
|
||||
True => np.s ! Abs ++ prep.miscAdv ! np.a ;
|
||||
False => prep.miscAdv ! Sg3 Masc }
|
||||
|
||||
@@ -74,7 +74,7 @@ lin city_N = mkN "magaalo" ;
|
||||
-- lin cloud_N = mkN "" ;
|
||||
-- lin coat_N = mkN "" ;
|
||||
-- lin cold_A = mkA "" ;
|
||||
-- lin come_V = etorri_V ;
|
||||
lin come_V = mkV "iman" ;
|
||||
-- lin computer_N = mkN "" ;
|
||||
-- lin correct_A = mkA "" ;
|
||||
-- lin count_V2 = mkV2 "" ;
|
||||
@@ -193,7 +193,7 @@ lin jump_V = mkV "bood" ;
|
||||
-- lin knee_N = mkN "" ;
|
||||
-- lin know_V2 = mkV2 "" ;
|
||||
-- lin know_VQ = mkVQ "" ;
|
||||
-- lin know_VS = mkVS "" ;
|
||||
lin know_VS = mkV "ogaan" ; -- copula ** {sii = "og"} ;
|
||||
|
||||
|
||||
----
|
||||
|
||||
@@ -63,6 +63,13 @@ Lang: PhrUtt NoPConj (UttS (UseCl (TTAnt TPres ASimul) PPos (GenericCl (ComplSla
|
||||
LangSom: hilib cusbo waa lagu dari karaa
|
||||
Lang: PhrUtt NoPConj (UttS (UseCl (TTAnt TPres ASimul) PPos (GenericCl (ComplVV can_VV (ComplSlash (Slash3V3 add_V3 (MassNP (UseN meat_N))) (MassNP (UseN salt_N))))))) NoVoc
|
||||
|
||||
--------------------------------------------------------------------------------
|
||||
-- Other complements
|
||||
|
||||
--LangEng: we knew that he is coming
|
||||
LangSom: in uu imanayo waa aynu ogaannay
|
||||
Lang: PhrUtt NoPConj (UttS (UseCl (TTAnt TPast ASimul) PPos (PredVP (UsePron we_Pron) (ComplVS know_VS (UseCl (TTAnt TPres ASimul) PPos (PredVP (UsePron he_Pron) (ProgrVP (UseV come_V)))))))) NoVoc
|
||||
|
||||
--------------------------------------------------------------------------------
|
||||
-- Adverbials
|
||||
|
||||
|
||||
Reference in New Issue
Block a user