(Ara) Add هَل in QuestCl, not in UseQCl

This commit is contained in:
Inari Listenmaa
2018-09-21 09:08:11 +02:00
parent 13ccd9d621
commit 341b96da9c
3 changed files with 22 additions and 2 deletions
+20
View File
@@ -0,0 +1,20 @@
--# -path=.:../common:../abstract
concrete ExtendAra of Extend =
CatAra ** ExtendFunctor - [
GenNP, SlashBareV2S, PredAPVP, GenModNP, ExistsNP,
StrandRelSlash, ExistPluralCN, ExistMassCN, ExistCN, EmptyRelSlash, DetNPMasc, DetNPFem,
ComplBareVS, ComplDirectVS, ComplDirectVQ
]
with (Grammar=GrammarAra)
** open
Prelude,
ResAra
in {
lin
GenNP np = { s = \\_,_,_ => np.s ; d = Const ; isNum, isPron = False } ;
} ;