GitHub/gf-rgl
1
0
Fork 1
mirror of https://github.com/GrammaticalFramework/gf-rgl.git synced 2026-06-08 14:46:31 -06:00
Code Issues Packages Projects Releases Wiki Activity

Erzsébet's fixes to Ger

Browse Source
This commit is contained in:
aarne
2012-05-26 08:57:01 +00:00
parent 05251820c4
commit cb0601bb47
3 changed files with 48 additions and 53 deletions
Download Patch File Download Diff File Expand all files Collapse all files

9
src/german/VerbGer.gf
View File

@@ -9,10 +9,11 @@ concrete VerbGer of Verb = CatGer ** open Prelude, ResGer in {
let
vpi = infVP v.isAux vp
in
insertExtrapos vpi.p3 (
insertInf vpi.p2 (
insertObj vpi.p1 (
predVGen v.isAux v))) ;
insertExtrapos vpi.p4 (
insertInfExt vpi.p3 (
insertInf vpi.p2 (
insertObj vpi.p1 (
predVGen v.isAux v)))) ;
ComplVS v s =
insertExtrapos (conjThat ++ s.s ! Sub) (predV v) ;