packages feed

gf-3.2: lib/src/amharic/ConjunctionAmh.gf


concrete ConjunctionAmh of Conjunction = 
CatAmh ** open ResAmh, Coordination, Prelude,ParamX, CommonX in {

 flags optimize=all_subs ;
	 coding = utf8;

  lin

	ConjS = conjunctDistrSS ;
	ConjAdv = conjunctDistrSS ;
	ConjNP conj ss = conjunctDistrTable Case conj ss ** { a = {png= conjAgr (agrP3 conj.n) ss.a.png ;isPron =False}};
	ConjAP conj ss = conjunctDistrTable4 Gender Number Species Case conj ss ;



	BaseS = twoSS ;
	ConsS = consrSS "፣" ;
	BaseAdv = twoSS ;
	ConsAdv = consrSS "፣"  ;
	BaseNP x y = twoTable Case x y ** {a = {png =conjAgr x.a.png y.a.png ;isPron = False}} ;
	ConsNP xs x = consrTable Case "፣" xs x ** {a = { png = conjAgr xs.a.png x.a.png ;isPron =False} }; 
	BaseAP x y = twoTable4 Gender Number Species Case x y  ;
	ConsAP xs x = consrTable4 Gender Number Species Case "፤"   xs x  ;

 lincat
	[S]  = {s1,s2 : Str} ;
	[Adv]= {s1,s2 : Str} ;
	[NP] = {s1,s2 : Case => Str ; a : Agr} ;
	[AP] = {s1,s2 : Gender => Number => Species => Case => Str} ;

}