summaryrefslogtreecommitdiff
path: root/next-lib/src/swedish/MakeStructuralSwe.gf
diff options
context:
space:
mode:
authoraarne <aarne@chalmers.se>2009-06-22 15:39:08 +0000
committeraarne <aarne@chalmers.se>2009-06-22 15:39:08 +0000
commite89fdae2fa1626348d8025824a7469252fa85e42 (patch)
treec7d46bbd0494043b4bd6f917a25a7687517d0547 /next-lib/src/swedish/MakeStructuralSwe.gf
parent3049b59b35b25381a7c6787444165c200d66e08b (diff)
next-lib renamed to lib, lib to old-lib
Diffstat (limited to 'next-lib/src/swedish/MakeStructuralSwe.gf')
-rw-r--r--next-lib/src/swedish/MakeStructuralSwe.gf19
1 files changed, 0 insertions, 19 deletions
diff --git a/next-lib/src/swedish/MakeStructuralSwe.gf b/next-lib/src/swedish/MakeStructuralSwe.gf
deleted file mode 100644
index 1da7840df..000000000
--- a/next-lib/src/swedish/MakeStructuralSwe.gf
+++ /dev/null
@@ -1,19 +0,0 @@
---# -path=.:../scandinavian:../common:../abstract
-
-resource MakeStructuralSwe = open CatSwe, ParadigmsSwe,
- (P=ParadigmsSwe), MorphoSwe, Prelude in {
-
-oper
- mkConj : Str -> Str -> P.Number -> Conj = \x,y,n ->
- {s1 = x ; s2 = y ; n = n ; lock_Conj = <>} ;
- mkSubj : Str -> Subj = \x ->
- {s = x ; lock_Subj = <>} ;
- mkIQuant : Str -> Str -> Str -> DetSpecies -> IQuant = \vilken,vilket,vilka,d ->
- {s = table (P.Number)
- [table (P.Gender) [vilken;vilket] ; table (P.Gender) [vilka;vilka]] ;
- det = d ; lock_IQuant = <>} ;
-
- dDefIndef : DetSpecies = DDef Indef ;
- ---- other DetSpecies
-
-}