mirror of
https://github.com/GrammaticalFramework/gf-core.git
synced 2026-05-18 15:42:50 -06:00
lib/amharic by Markos Kassa Gobena
This commit is contained in:
14
lib/src/amharic/IdiomAmh.gf
Normal file
14
lib/src/amharic/IdiomAmh.gf
Normal file
@@ -0,0 +1,14 @@
|
||||
concrete IdiomAmh of Idiom = CatAmh ** open Prelude, ResAmh in {
|
||||
----
|
||||
---- flags optimize=all_subs ;
|
||||
----
|
||||
---- lin
|
||||
---- ExistNP np =
|
||||
---- mkClause "تهري" (agrP3 np.a.n) (insertObj (\\_ => np.s ! Acc) (predAux auxBe)) ;
|
||||
---- ImpersCl vp = mkClause "ِت" (agrP3 Sg) vp ;
|
||||
---- GenericCl vp = mkClause "ْني" (agrP3 Sg) vp ;
|
||||
----
|
||||
---- ProgrVP vp = insertObj (\\a => vp.ad ++ vp.prp ++ vp.s2 ! a) (predAux auxBe) ;
|
||||
---- ProgrVP : VP -> VP ; -- be sleeping
|
||||
}
|
||||
|
||||
Reference in New Issue
Block a user