diff options
| author | aarne <aarne@cs.chalmers.se> | 2008-11-15 20:08:09 +0000 |
|---|---|---|
| committer | aarne <aarne@cs.chalmers.se> | 2008-11-15 20:08:09 +0000 |
| commit | f30560efcc5acb39f8b9a4a5d0ea0482224a5fc1 (patch) | |
| tree | 91f1e3b2a3044ee3531dcf4a799db427681c81b4 /next-lib/src/german/MakeStructuralGer.gf | |
| parent | 373b4d6828e0eba56e11cd5851591d303f369b43 (diff) | |
Attempto complete up to spec
Diffstat (limited to 'next-lib/src/german/MakeStructuralGer.gf')
| -rw-r--r-- | next-lib/src/german/MakeStructuralGer.gf | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/next-lib/src/german/MakeStructuralGer.gf b/next-lib/src/german/MakeStructuralGer.gf index 8f5006df9..1a26e59cd 100644 --- a/next-lib/src/german/MakeStructuralGer.gf +++ b/next-lib/src/german/MakeStructuralGer.gf @@ -7,5 +7,7 @@ oper {s1 = x ; s2 = y ; n = n ; lock_Conj = <>} ; mkSubj : Str -> Subj = \x -> {s = x ; lock_Subj = <>} ; + mkIQuant : Str -> IQuant = \s -> + {s = \\_,_,_ => s ; lock_IQuant = <>} ; } |