GitHub/gf-core
1
0
Fork 1
mirror of https://github.com/GrammaticalFramework/gf-core.git synced 2026-05-23 18:02:54 -06:00
Code Issues Packages Projects Releases Wiki Activity

trams with mm library

Browse Source
This commit is contained in:
aarne
2005-11-07 21:45:22 +00:00
parent f6d064d9f7
commit 9388b1f189
14 changed files with 179 additions and 46 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
lib/resource/abstract/DemRes.gf
View File

@@ -47,8 +47,8 @@ interface DemRes = open Prelude, Resource in {
Demonstrative : Type = mkDemType NP ;
DemAdverb : Type = mkDemType Adv ;
addDAdv : Adv -> Pointing -> DemAdverb -> DemAdverb = \a,p,d ->
{s = a.s ++ d.s ; s5 = p.s5 ++ d.s5 ; lock_Adv = a.lock_Adv} ;
mkDAdv : Adv -> Pointing -> DemAdverb = \a,p ->
a ** p ** {lock_Adv = a.lock_Adv} ;
param
MSForm = MInd Bool | MQuest Bool ;