summaryrefslogtreecommitdiff
path: root/next-lib/src/swedish/StructuralSwe.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/StructuralSwe.gf
parent3049b59b35b25381a7c6787444165c200d66e08b (diff)
next-lib renamed to lib, lib to old-lib
Diffstat (limited to 'next-lib/src/swedish/StructuralSwe.gf')
-rw-r--r--next-lib/src/swedish/StructuralSwe.gf155
1 files changed, 0 insertions, 155 deletions
diff --git a/next-lib/src/swedish/StructuralSwe.gf b/next-lib/src/swedish/StructuralSwe.gf
deleted file mode 100644
index 32f8ace3c..000000000
--- a/next-lib/src/swedish/StructuralSwe.gf
+++ /dev/null
@@ -1,155 +0,0 @@
-concrete StructuralSwe of Structural = CatSwe **
- open MorphoSwe, ParadigmsSwe, MakeStructuralSwe,
- (X = ConstructX), Prelude in {
-
- flags optimize=all ;
-
- lin
- above_Prep = ss "ovanför" ;
- after_Prep = ss "efter" ;
- by8agent_Prep = ss "av" ;
- all_Predet = {s = gennumForms "all" "allt" "alla"} ;
- almost_AdA, almost_AdN = ss "nästan" ;
- although_Subj = ss "fast" ;
- always_AdV = ss "alltid" ;
- and_Conj = {s1 = [] ; s2 = "och" ; n = Pl} ;
- because_Subj = ss "eftersom" ;
- before_Prep = ss "före" ;
- behind_Prep = ss "bakom" ;
- between_Prep = ss "mellan" ;
- both7and_DConj = sd2 "både" "och" ** {n = Pl} ;
- but_PConj = ss "men" ;
- by8means_Prep = ss "med" ;
- can8know_VV, can_VV =
- mkV "kunna" "kan" "kunn" "kunde" "kunnat" "kunnen" **
- {c2 = mkComplement [] ; lock_VV = <>} ;
- during_Prep = ss "under" ;
- either7or_DConj = sd2 "antingen" "eller" ** {n = Sg} ;
- everybody_NP = regNP "alla" "allas" Plg ;
- every_Det = {
- s = \\_,_ => "varje" ;
- sp = \\_,_ => "var och en" ; ----
- n = Sg ;
- det = DIndef
- } ;
- everything_NP = regNP "allting" "alltings" SgNeutr ;
- everywhere_Adv = ss "överallt" ;
- few_Det = {s,sp = \\_,_ => "få" ; n = Pl ; det = DDef Indef} ;
---- first_Ord = {s = "första" ; isDet = True} ;
- for_Prep = ss "för" ;
- from_Prep = ss "från" ;
- he_Pron = MorphoSwe.mkNP "han" "honom" "hans" "hans" "hans" SgUtr P3 ;
- here_Adv = ss "här" ;
- here7to_Adv = ss "hit" ;
- here7from_Adv = ss "härifrån" ;
- how_IAdv = ss "hur" ;
- how8many_IDet = {s = \\_ => ["hur många"] ; n = Pl ; det = DDef Indef} ;
- if_Subj = ss "om" ;
- in8front_Prep = ss "framför" ;
- i_Pron = MorphoSwe.mkNP "jag" "mig" "min" "mitt" "mina" SgUtr P1 ;
- in_Prep = ss "i" ;
- it_Pron = MorphoSwe.regNP "det" "dess" SgNeutr ;
- less_CAdv = X.mkCAdv "mindre" "än" ;
- many_Det = {s,sp = \\_,_ => "många" ; n = Pl ; det = DDef Indef} ;
- more_CAdv = X.mkCAdv "mer" "än" ;
- most_Predet = {s = gennumForms ["den mesta"] ["det mesta"] ["de flesta"]} ;
- much_Det = {s,sp = \\_,_ => "mycket" ; n = Pl ; det = DDef Indef} ;
- must_VV =
- mkV "få" "måste" "få" "fick" "måst" "måst" **
- {c2 = mkComplement [] ; lock_VV = <>} ;
- no_Utt = ss ["nej"] ;
- on_Prep = ss "på" ;
---- one_Quant = {s = \\_,_ => genderForms ["en"] ["ett"] ; n = Sg ; det = DIndef} ;
- only_Predet = {s = \\_ => "bara"} ;
- or_Conj = {s1 = [] ; s2 = "eller" ; n = Sg} ;
- otherwise_PConj = ss "annars" ;
- part_Prep = ss "av" ;
- please_Voc = ss "tack" ; ---
- possess_Prep = ss "av" ;
- quite_Adv = ss "ganska" ;
- she_Pron = MorphoSwe.mkNP "hon" "henne" "hennes" "hennes" "hennes" SgUtr P3 ;
- so_AdA = ss "så" ;
- someSg_Det = {s,sp = \\_ => genderForms "någon" "något" ; n = Sg ; det = DIndef} ;
- somePl_Det = {s,sp = \\_,_ => "några" ; n = Pl ; det = DIndef} ;
- somebody_NP = regNP "någon" "någons" SgUtr ;
- something_NP = regNP "något" "någots" SgNeutr ;
- somewhere_Adv = ss "någonstans" ;
- that_Quant =
- {s,sp = table {
- Sg => \\_,_ => genderForms ["den där"] ["det där"] ;
- Pl => \\_,_,_ => ["de där"]
- } ;
- det = DDef Def
- } ;
- there_Adv = ss "där" ;
- there7to_Adv = ss "dit" ;
- there7from_Adv = ss "därifrån" ;
- therefore_PConj = ss "därför" ;
- they_Pron = MorphoSwe.mkNP "de" "dem" "deras" "deras" "deras" Plg P1 ;
- this_Quant =
- {s,sp = table {
- Sg => \\_,_ => genderForms ["den här"] ["det här"] ;
- Pl => \\_,_,_ => ["de här"]
- } ;
- det = DDef Def
- } ;
- through_Prep = ss "genom" ;
- too_AdA = ss "för" ;
- to_Prep = ss "till" ;
- under_Prep = ss "under" ;
- very_AdA = ss "mycket" ;
- want_VV =
- mkV "vilja" "vill" "vilj" "ville" "velat" "velad" **
- {c2 = mkComplement [] ; lock_VV = <>} ;
- we_Pron = MorphoSwe.mkNP "vi" "oss" "vår" "vårt" "våra" Plg P1 ;
- whatSg_IP = {s = \\_ => "vad" ; gn = SgUtr} ; ---- infl
- whatPl_IP = {s = \\_ => "vad" ; gn = Plg} ; ---- infl
- when_IAdv = ss "när" ;
- when_Subj = ss "när" ;
- where_IAdv = ss "var" ;
- which_IQuant = {
- s = table {
- Sg => genderForms "vilken" "vilket" ;
- Pl => \\_ => "vilka"
- } ;
- det = DIndef
- } ;
- whoSg_IP = {s = vem.s ; gn = SgUtr} ;
- whoPl_IP = {s = \\_ => "vilka" ; gn = Plg} ;
- why_IAdv = ss "varför" ;
- without_Prep = ss "utan" ;
- with_Prep = ss "med" ;
- yes_Utt = ss ["ja"] ;
- youSg_Pron = MorphoSwe.mkNP "du" "dig" "din" "ditt" "dina" SgUtr P2 ;
- youPl_Pron = MorphoSwe.mkNP "ni" "er" "er" "ert" "era" Plg P2 ;
- youPol_Pron = MorphoSwe.mkNP "ni" "er" "er" "ert" "era" SgUtr P2 ; --- wrong in refl
-
--- Auxiliaries that are used repeatedly.
-
- oper
- vem = MorphoSwe.mkNP "vem" "vem" "vems" "vems" "vems" SgUtr P3 ;
-
-lin
- not_Predet = {s = \\_ => "inte"} ;
- no_Quant =
- {s,sp = table {
- Sg => \\_,_ => genderForms "ingen" "inget" ;
- Pl => \\_,_,_ => "inga"
- } ;
- det = DIndef
- } ;
-
- if_then_Conj = {s1 = "om" ; s2 = "så" ; n = singular} ;
- nobody_NP = regNP "ingen" "ingens" SgUtr ;
- nothing_NP = regNP "inget" "ingets" SgNeutr ;
-
- at_least_AdN = ss "minst" ;
- at_most_AdN = ss "högst" ;
-
- except_Prep = ss "utom" ;
-
- as_CAdv = X.mkCAdv "lika" "som" ;
- have_V2 = dirV2 (mkV "ha" "har" "ha" "hade" "haft" "haft") ; ---- pp
-
-}
-