1
0
forked from GitHub/gf-rgl

(Som) VP, VPSlash, ComplSlash etc.

This commit is contained in:
Inari Listenmaa
2019-06-07 18:44:29 +02:00
parent 4009dface9
commit a9bd48ccdd
8 changed files with 103 additions and 40 deletions
+2 -2
View File
@@ -11,12 +11,12 @@ lin
-- ComparAdvAdjS : CAdv -> A -> S -> Adv ; -- more warmly than he runs
-- : Prep -> NP -> Adv ;
PrepNP prep np = {s = prep.s ! np.a ; s2 = np.s ! Abs} ; ---- ?
PrepNP prep np = prep ** {s = [] ; np = np} ;
-- Adverbs can be modified by 'adadjectives', just like adjectives.
--AdAdv : AdA -> Adv -> Adv ; -- very quickly
AdAdv ada adv = adv ** { s = ada.s ++ adv.s } ;
AdAdv ada adv = adv ** {s = ada.s ++ adv.s} ;
-- Like adverbs, adadjectives can be produced by adjectives.
-- : A -> AdA ; -- extremely