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

Founding the newly structured GF2.0 cvs archive.

Browse Source
This commit is contained in:
aarne
2003-09-22 13:16:55 +00:00
commit b1402e8bd6
162 changed files with 25569 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

23
grammars/resource/german/Logical.gf Normal file
View File

@@ -0,0 +1,23 @@
-- Slightly ad hoc and formal negation and connectives.
resource Logical = Predication ** open Deutsch, Paradigms in {
oper
negS : S -> S ; -- es ist nicht der Fall, dass S
univS : CN -> S -> S ; -- für alle CNs gilt es, dass S
existS : CN -> S -> S ; -- es gibt ein CN derart, dass S
existManyS : CN -> S -> S ; -- es gibt CNs derart, dass S
--.
negS = \A ->
PredVP ItNP (NegNP (DefOneNP (CNthatS (UseN (nRaum "Fall" "Fälle")) A))) ;
univS = \A,B ->
PredVP ItNP (AdvVP (PosVS (mkV "gelten" "gilt" "gelte" "gegolten") B)
(mkPP accusative "für" (DetNP AllDet A))) ;
existS = \A,B ->
PredVP ItNP (PosTV (tvDir (mkV "geben" "gibt" "gib" "gegeben"))
(IndefOneNP (ModRC A (RelSuch B)))) ;
existManyS = \A,B ->
PredVP ItNP (PosTV (tvDir (mkV "geben" "gibt" "gib" "gegeben"))
(IndefManyNP (ModRC A (RelSuch B)))) ;
} ;