more work on BasicGer

lib/resource-1.0/german/BasicGer.gf

@@ -30,8 +30,8 @@ lin
   boss_N = reg2N "Chef" "Chefe" masculine ; ----
   boy_N = reg2N "Junge" "Jungen" masculine ;
   bread_N = reg2N "Brot" "Brote" neuter ; ----
-  break_V2 = dirV2 (prefixV "zer" 
+  break_V2 = dirV2 
-    (irregV "schlagen" "schlägt" "schlug" "schlüge" "geschlagen")) ;
+    (irregV "zerschlagen" "zerschlägt" "zerschlug" "zerschlüge" "zerschlagen") ;
   broad_A = regA "breit" ;
   brother_N2 = mkN2 (reg2N "Bruder" "Brüder" masculine)  zu_Prep ; ----
   brown_A = regA "braun" ;
@@ -40,7 +40,7 @@ lin
 ----  camera_N = regN "kamera" ;
   cap_N = regN "Mütze" ;
   car_N = reg2N "Wagen" "Wagen" masculine ;
-  carpet_N = reg2N "Teppich" "Teppiche" masculine ;
+  carpet_N = regN "Teppich" ;
   cat_N = regN "Katze" ;
 ----  ceiling_N = regN "tak"  ;
   chair_N = reg2N "Stuhl" "Stühle" masculine ;
@@ -53,83 +53,82 @@ lin
   close_V2 = dirV2 (irregV "schliessen" "schließt" "schloß" "schlöße" "geschlossen") ;
   coat_N = regN "Jacke" ;
   cold_A = regA "Kalt" ;
+  come_V = seinV (mkV "kommen" "kommt" "komm" "kam" "käme" "gekommen") ;
+  computer_N = reg2N "Rechner" "Rechner" masculine ;
+  country_N = reg2N "Land" "Länder" neuter ;
+  cousin_N = reg2N "Vetter" "Vetter" masculine ; --- Kusine
+  cow_N = reg2N "Kuh" "Kühe" feminine ;
+  die_V = seinV (irregV "sterben" "stirbt" "starb" "stärbe" "gestorben") ;
+  distance_N3 = mkN3 (regN "Entfernung") von_Prep zu_Prep ;
+  dirty_A = regA "schmutzig" ;
+  doctor_N = reg2N "Arzt" "Ärzte" masculine ;
+  dog_N = regN "Hund" ;
+  door_N = reg2N "Tür" "Türe" feminine ;
+  drink_V2 = dirV2 (irregV "trinken" "trinkt" "trank" "tränke" "getrunken") ;
+  easy_A2V = mkA2V (regA "leicht") (mkPrep "für" accusative) ;
+  eat_V2 = dirV2 (irregV "essen" "ißt" "aß" "äße" "gegessen") ;
+  empty_A = regA "leer" ; ---- check infl
+  enemy_N = regN "Feind" ; ----
+  factory_N = regN "Fabrike" ;
+  father_N2 = mkN2 (reg2N "Vater" "Väter" masculine) von_Prep ;
+  fear_VS = mkVS (regV "fürchten") ;
+  find_V2 = dirV2 (irregV "finden" "findet" "fand" "fände" "gefunden") ;
+  fish_N = regN "Fisch" ;
+  floor_N = reg2N "Fußboden" "Fußböden" masculine ;
+  forget_V2 = dirV2 (irregV "vergessen" "vergißt" "vergaß" "vergässe" "vergessen") ;
+  fridge_N = reg2N "Kühlschrank" "Kühlschränke" masculine ;
+  friend_N = regN "Freund" ;
+  fruit_N = reg2N "Frucht" "Früchte" feminine ;
+  fun_AV = mkAV (regA "toll") ;
+  garden_N = reg2N "Garten" "Gärten" masculine ;
+  girl_N = reg2N "Mädchen" "Mädchen" neuter ;
+  glove_N = regN "Handschuh" ;
+  gold_N = regN "Gold" ; ----
+  good_A = mkA "gut" "gut" "besser" "best" ;
+  go_V = seinV (irregV "gehen" "geht" "ging" "ginge" "gegangen") ;
+  green_A = regA "grün" ;
+  harbour_N = reg2N "Hafen" "Häfen" masculine ;
+  hate_V2 = dirV2 (regV "Hassen") ;
+  hat_N = reg2N "Hut" "Hüte" masculine ;
+----  have_V2 = dirV2 (mkV "ha" "har" "ha" "hade" "haft" "haft") ; ---- pp
+  hear_V2 = dirV2 (regV "hören") ;
+----  hill_N = regN "kulle" ;
+  hope_VS = mkVS (regV "hoffen") ;
+  horse_N = reg2N "Pferd" "Pferde" neuter ;
+  hot_A = regA "heiß" ;
+  house_N = reg2N "Haus" "Häuser" neuter ;
+  important_A = regA "wichtig" ;
+  industry_N = regN "Industrie" ;
+  iron_N = reg2N "Eisen" "Eisen" neuter ;
+  king_N = regN "König" ;
+  know_V2 = dirV2 (irregV "wissen" "weiß" "wußte" "wüßte" "gewußt") ; ---- infl
+----  lake_N = mkN "sjö" "sjön" "sjöar" "sjöarna" ;
+  lamp_N = regN "Lampe";
+  learn_V2 = dirV2 (regV "lernen") ;
+----  leather_N = regN "Leder" ;
+  leave_V2 = 
+    dirV2 (irregV "verlassen" "verläßt" "verließ" "verliesse" "verlassen") ;
+  like_V2 = dirV2 (irregV "magen" "mag" "mochte" "möchte" "gemocht") ;
+  listen_V2 = mkV2 (prefixV "zu" (regV "hören")) datPrep ; ---- dat
+  live_V = regV "leben" ;
+  long_A = mkA "lang" "lang" "länger" "längst" ;
+  lose_V2 = dirV2 (irregV "verlieren" "verliert" "verlor" "verlöre" "verloren") ;
+  love_N = regN "Liebe" ;
+  love_V2 = dirV2 (regV "lieben") ;
+  man_N = reg2N "Mann" "Männer" masculine ;
+  married_A2 = mkA2 (regA "verheiratet") (mkPrep "mit" dative) ;
+  meat_N = reg2N "Fleisch" "Fleische" neuter ; ---- Pl
+  milk_N = reg2N "Milch" "Milchen" feminine ; ---- Pl
+  moon_N = regN "Mond" ; ---- Pl
+  mother_N2 = mkN2 (reg2N "Mutter" "Mütter" feminine) von_Prep ;
+  mountain_N = regN "Berg" ;
+  music_N = reg2N "Musik" "Musiken" feminine ;
+  narrow_A = regA "schmal" ;
+  new_A = regA "neu" ;
+  newspaper_N = regN "Zeitung" ;
 {-
-  come_V = (mkV "komma" "kommer" "kom" "kom" "kommit" "kommen") ;
-  computer_N = reg2N "dator" "datorer" ;
-  country_N = mkN "land" "landet" "länder" "länderna" ;
-  cousin_N = reg2N "kusin" "kusinerna" ;
-  cow_N = reg2N "ko" "kor" ;
-  die_V = (mkV "dö" "dör" "dö" "dog" "dött" "dödd") ; ----
-  distance_N3 = mkN3 (reg2N "avstånd" "avstånd") "från" "till" ;
-  dirty_A = regADeg "smutsig" ;
-  doctor_N = reg2N "läkare" "läkare" ;
-  dog_N = regN "hund" ;
-  door_N = regN "dörr" ;
-  drink_V2 = dirV2 (irregV "dricka" "drack" "druckit") ;
-  easy_A2V = mkA2V (mk2A "lätt" "lätt") "för" ;
-  eat_V2 = dirV2 (irregV "äta" "åt" "ätit") ;
-  empty_A = mkADeg "tom" "tomt" "tomma" "tomma" "tommare" "tommast" "tommaste" ;
-  enemy_N = regN "fiende"  ;
-  factory_N = reg2N "fabrik" "fabriker" ;
-  father_N2 = mkN2 ((mkN "far" "fadern" "fäder" "fäderna")) "till" ;
-  fear_VS = mkVS (regV "frukta") ;
-  find_V2 = dirV2 (irregV "finna" "fann" "funnit") ;
-  fish_N = reg2N "fisk" "fiskar" ;
-  floor_N = regN "golv"  ;
-  forget_V2 = dirV2 (mkV "glömma" "glömmer" "glöm" "glömde" "glömt" "glömd") ;
-  fridge_N = regN "kylskåp"  ;
-  friend_N = mkN "vän" "vännen" "vänner" "vännerna" ;
-  fruit_N = reg2N "frukt" "frukter" ;
-  fun_AV = mkAV (regA "rolig") ;
-  garden_N = regN "trädgård" ;
-  girl_N = regN "flicka" ;
-  glove_N = regN "handske" ;
-  gold_N = regN "guld"  ;
-  good_A = mkADeg "god" "gott" "goda" "goda" "bättre" "bäst" "bästa" ;
-  go_V = (mkV "gå" "går" "gå" "gick" "gått" "gången") ;
-  green_A = regADeg "grön" ;
-  harbour_N = regN "hamn";
-  hate_V2 = dirV2 (regV "hata") ;
-  hat_N = regN "hatt" ;
-  have_V2 = dirV2 (mkV "ha" "har" "ha" "hade" "haft" "haft") ; ---- pp
-  hear_V2 = dirV2 (mkV "höra" "hör" "hör" "hörde" "hört" "hörd") ;
-  hill_N = regN "kulle" ;
-  hope_VS = mkVS ((regV "önska")) ;
-----  hope_VS = mkVS (depV (regV "hoppas")) ;
-  horse_N = regN "häst" ;
-  hot_A = regADeg "het" ;
-  house_N = regN "hus"  ;
-  important_A = regADeg "viktig" ;
-  industry_N = reg2N "industri" "industrier" ; ---- "ien" ??
-  iron_N = regN "järn"  ;
-  king_N = (regN "kung") ;
-  know_V2 = dirV2 (mkV "veta" "vet" "vet" "visste" "vetat" "visst") ;
-  lake_N = mkN "sjö" "sjön" "sjöar" "sjöarna" ;
-  lamp_N = regN "lampa";
-  learn_V2 = dirV2 (mkV "lära" "lär" "lär" "lärde" "lärt" "lärd") ; ---- refl!
-  leather_N = mkN "läder" "lädret" "läder" "lädren" ;
-  leave_V2 = dirV2 (regV "lämna") ;
-  like_V2 = mkV2 (mk2V "tycka" "tyckte") "om" ;
-  listen_V2 = mkV2 (regV "lyssna") "på" ;
-  live_V = (irregV "leva" "levde" "levt") ; ---- ?
-  long_A = irregADeg "lång" "längre" "längst" ;
-  lose_V2 = dirV2 (regV "förlora") ;
-  love_N = regN "kärlek" ;
-  love_V2 = dirV2 (regV "älska") ;
-  man_N = (mkN "man" "mannen" "män" "männen") ;
-  married_A2 = mkA2 (mk2A "gift" "gift") "med" ;
-  meat_N = regN "kött"  ;
-  milk_N = regN "mjölk" ; ---- -ar?
-  moon_N = regN "måne" ;
-  mother_N2 = mkN2 (mkN "mor" "modern" "mödrar" "mödrarna") "till" ;
-  mountain_N = regN "berg"  ;
-  music_N = reg2N "musik" "musiker" ; ---- er ?
-  narrow_A = regADeg "smal" ;
-  new_A = mkADeg "ny" "nytt" "nya" "nya" "nyare" "nyast" "nyaste" ;
-  newspaper_N = regN "tidning" ;
-
   oil_N = regN "olja" ;
-  old_A = mkADeg "gammal" "gammalt" "gamla" "gamla" "äldre" "äldst" "äldsta" ;
+  old_A = mkA "gammal" "gammalt" "gamla" "gamla" "äldre" "äldst" "äldsta" ;
   open_V2 = dirV2 (regV "öppna") ;
   paint_V2A = mkV2A (regV "måla") [] ;
   paper_N = mkN "papper" "pappret" "papper" "pappren" ;
@@ -145,7 +144,7 @@ lin
   radio_N = regN "radio" ; ----
   rain_V0 = mkV0 (regV "regna") ;
   read_V2 = dirV2 (mk2V "läsa" "läste") ;
-  red_A = mk2ADeg "röd" "rött" ;
+  red_A = mk2A "röd" "rött" ;
   religion_N = reg2N "religion" "religioner" ;
   restaurant_N = reg2N "restaurang" "restauranger" ;
   river_N = mkN "å" "ån" "åar" "åarna" ;
@@ -166,11 +165,11 @@ lin
   shirt_N = regN "skjorta" ;
   shoe_N = regN "sko" ;
   shop_N = reg2N "affär" "affären" ;
-  short_A = regADeg "kort" ;
+  short_A = regA "kort" ;
   silver_N = mkN "silver" "silvret" "silver" "silvren" ;
   sister_N = reg2N "syster" "systrar" ;
   sleep_V = (irregV "sova" "sov" "sovit") ;
-  small_A = mkADeg "liten" "litet" "lilla" "små" "mindre" "minst" "minsta" ;
+  small_A = mkA "liten" "litet" "lilla" "små" "mindre" "minst" "minsta" ;
   snake_N = regN "orm" ;
   sock_N = regN "strumpa" ;
   speak_V2 = dirV2 (regV "tala") ;
@@ -179,7 +178,7 @@ lin
   stone_N = regN "sten" ;
   stove_N = regN "spis" ;
   student_N = reg2N "student" "studenter" ;
-  stupid_A = mk3ADeg "dum" "dumt" "dumma" ;
+  stupid_A = mk3A "dum" "dumt" "dumma" ;
   sun_N = regN "sol" ;
   switch8off_V2 = dirV2 (partV (irregV "stänga" "stängde" "stängt") "av") ;
   switch8on_V2 = dirV2 (partV (irregV "slå" "slog" "slagit") "på") ;
@@ -188,23 +187,23 @@ lin
   teacher_N = reg2N "lärare" "lärare" ;
   teach_V2 = dirV2 (regV "undervisa") ;
   television_N = reg2N "television" "televisioner" ;
-  thick_A = regADeg "tjock" ;
+  thick_A = regA "tjock" ;
-  thin_A = mk2ADeg "tunn" "tunt" ;
+  thin_A = mk2A "tunn" "tunt" ;
   train_N = regN "tåg"  ;
   travel_V = mk2V "resa" "reste" ;
   tree_N = regN "träd"  ;
   ----  trousers_N = regN "trousers" ; ---- pl t !
-  ugly_A = regADeg "ful" ;
+  ugly_A = regA "ful" ;
   understand_V2 = dirV2 (mkV "förstå" "förstår" "förstå" "förstod" "förstått" "förstådd") ;
   university_N = regN "universitet"  ;
   village_N = mkN "by" "byn" "byar" "byarna" ;
   wait_V2 = mkV2 (regV "vänta") "på" ;
   walk_V = (mkV "gå" "går" "gå" "gick" "gått" "gången") ;
-  warm_A = regADeg "varm" ;
+  warm_A = regA "varm" ;
   war_N = regN "krig" ;
   watch_V2 = mkV2 (regV "titta") "på" ;
   water_N = mkN "vatten" "vattnet" "vatten" "vattnen" ;
-  white_A = regADeg "vit" ;
+  white_A = regA "vit" ;
   window_N = mkN "fönster" "fönstret" "fönster" "fönstren" ;
   wine_N = mkN "vin" "vinet" "viner" "vinerna" ; ----
   win_V2 = dirV2 (irregV "vinna" "vann" "vunnit") ;
@@ -212,8 +211,8 @@ lin
   wonder_VQ = mkVQ (regV "undra") ;
   wood_N = mkN "trä" "träet" "träen" "träena" ; ---- ?
   write_V2 = dirV2 (irregV "skriva" "skrev" "skrivit") ;
-  yellow_A = regADeg "gul" ;
+  yellow_A = regA "gul" ;
-  young_A = irregADeg "ung" "yngre" "yngst" ;
+  young_A = irregA "ung" "yngre" "yngst" ;
 
   do_V2 = dirV2 (mkV "göra" "gör" "gör" "gjorde" "gjort" "gjord") ;
   now_Adv = mkAdv "nu" ;

lib/resource-1.0/german/log.txt

@@ -205,3 +205,8 @@ ParamGer: removed Strong/Weak from AForm to save lexicon storage. Done in agrAdj
 
 ParadigmsGer: completed
 
+ParamGer: VType
+ResGer, ParadigmsGer: the consequences of this
+
+BasicGer; started
+