msyds/gf-core
1
0
Fork 0
forked from GitHub/gf-core
Code Pull Requests Activity

corrections in Attempto grammars

Browse Source
This commit is contained in:
aarne
2008-11-08 09:38:32 +00:00
parent 70e49b204c
commit fc0432e4e1
9 changed files with 48 additions and 34 deletions
Download Patch File Download Diff File Expand all files Collapse all files

18
examples/attempto/TestAttemptoGer.gf
View File

@@ -26,14 +26,14 @@ lin well_known_A = mkA "bekannt" ;
lin important_A = mkA "wichtig" ;
lin expensive_A = mkA "teuer" ;
lin fill_in_V2 = mkV2 (mkV "ab" (mkV "füllen")) ;
lin form_N = mkgN "Formulär" "Formuläre" neuter ;
lin form_N = mkgN "Formular" "Formulare" neuter ;
lin age_N = mkgN "Alter" "Älter" masculine ;
lin teacher_N = mkgN "Lehrer" "Lehrer" masculine ;
lin successful_A = mkA "erfolgreich" ;
lin fond_A2 = mkA2 (mkA "verliebt") (mkPrep "in" dative) ;
lin garden_N = mkgN "Garten" "Gärten" masculine ;
lin morning_N = mkgN "Morgen" "Morgen" masculine ;
lin code_N = mkkN "Code" ;
lin code_N = mkgN "Code" "Codes" masculine ;
lin drinkable_A = mkA "trinkbar" ;
lin work_V = mkV "arbeiten" ;
lin admitted_A = mkA "zugelassen" ;
@@ -44,7 +44,7 @@ lin income_N = mkgN "Einkommen" "Einkommen" neuter ;
lin england_PN = mkPN "England" ;
lin beginning_N = mkgN "Anfang" "Anfänge" masculine ;
lin office_N = mkgN "Büro" "Büros" neuter ;
lin interested_A2 = mkA2 (mkA "interessiert") (mkPrep "an" accusative) ; ----
lin interested_A2 = mkA2 (mkA "interessiert") (mkPrep "an" dative) ; ----
lin classroom_N = mkkN "Klasse" ;
lin manually_Adv = mkAdv "manuell" ;
lin slot_N = mkgN "Hohl" "Höhle" masculine ; ----
@@ -55,16 +55,16 @@ lin time_N = mkgN "Zeit" "Zeiten" feminine ;
lin believe_V = mkV "glauben" ;
lin seriously_Adv = mkAdv "seriös" ; ----
lin clerk_N = mkgN "Angestellt" "Angestellten" masculine ; ----
lin screen_N = mkgN "Schirm" "Schirme" neuter ;
lin screen_N = mkgN "Schirm" "Schirme" masculine ;
lin blink_V = mkV "blinken" ; ----
lin bed_N = mkgN "Bett" "Bette" neuter ;
lin container_N = mkgN "Gehälter" "Gehälter" masculine ;
lin automated_teller_N = mkgN "Automat" "Automate" neuter ;
lin reject_V2 = mkV2 (mkV "verwerfen") ; ----
lin reject_V2 = mkV2 (mkV "verwerfen" "verwirft" "verwarf" "verwürfe" "verworfen") ;
lin accept_V2 = mkV2 (mkV "an" nehmen_V) ;
lin type_V2 = mkV2 "typen" ; ----
lin type_V2 = mkV2 schreiben_V ;
lin know_V = wissen_V ;
lin manager_N = mkgN "Manager" "Managers" masculine ; ----
lin manager_N = mkgN "Manager" "Manager" masculine ; ----
lin oversleep_V = schlafen_V ; ----
lin valid_A = mkA "gültig" ;
lin see_V2 = mkV2 sehen_V ;
@@ -72,9 +72,11 @@ lin bark_V = mkV "bellen" ;
lin go_V2 = mkV2 gehen_V to_Prep ;
lin brother_N = mkgN "Bruder" "Brüder" masculine ;
lin mary_PN = mkPN "Mary" ;
lin machine_N = mkkN "maschine" ;
lin machine_N = mkkN "Maschine" ;
lin correct_A = mkA "korrekt" ;
lin kilogram_Unit = mkgN "Kilo" "Kilo" neuter ;
oper
mkkN : Str -> CN = \n -> mkCN (ParadigmsGer.mkN n) ;
mkgN : Str -> Str -> Gender -> CN = \s,n,g -> mkCN (ParadigmsGer.mkN s n g) ;