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

added linref's to Ger Hin Romance

Browse Source
This commit is contained in:
aarne
2013-11-28 08:05:58 +00:00
parent 6401a37e21
commit ab90b3c7ef
5 changed files with 52 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

14
lib/src/german/CatGer.gf
View File

@@ -98,4 +98,18 @@ concrete CatGer of Cat =
Temp = {s : Str ; t : ResGer.Tense ; a : Anteriority ; m : Mood} ;
Tense = {s : Str ; t : ResGer.Tense ; m : Mood} ;
linref
SSlash = \ss -> ss.s ! Main ++ ss.c2.s ;
ClSlash = \cls -> cls.s ! MIndic ! Pres ! Simul ! Pos ! Main ++ cls.c2.s ;
VP = \vp -> useInfVP False vp ;
VPSlash = \vps -> useInfVP False vps ++ vps.c2.s ;
V, VS, VQ, VA = \v -> useInfVP False (predV v) ;
V2, V2A, V2Q, V2S = \v -> useInfVP False (predV v) ++ v.c2.s ;
V3 = \v -> useInfVP False (predV v) ++ v.c2.s ++ v.c3.s ;
VV = \v -> useInfVP False (predV v) ;
V2V = \v -> useInfVP False (predV v) ++ v.c2.s ;
Conj = \c -> c.s1 ++ c.s2 ;
}