GitHub/gf-core
1
0
Fork 1
mirror of https://github.com/GrammaticalFramework/gf-core.git synced 2026-05-13 21:22:50 -06:00
Code Issues Packages Projects Releases Wiki Activity

added a version of compoundN which combines adjective and noun into a new noun

Browse Source
This commit is contained in:
kr.angelov
2013-09-20 12:04:37 +00:00
parent fd430a40fe
commit d2dc171508
3 changed files with 17 additions and 12 deletions
Download Patch File Download Diff File Expand all files Collapse all files

7
lib/src/bulgarian/ResBul.gf
View File

@@ -155,6 +155,13 @@ resource ResBul = ParamX ** open Prelude, Predef in {
GPl => APl spec
} ;
indefAForm : AForm -> AForm
= \af -> case af of {
ASg g spec => ASg g Indef ;
ASgMascDefNom => ASg Masc Indef ;
APl spec => APl Indef
} ;
dgenderSpecies : AGender -> Species -> Role -> CardForm =
\g,spec,role -> case <g,spec> of {
<AMasc a,Indef> => CFMasc Indef a ;