GitHub/gf-core
1
0
Fork 1
mirror of https://github.com/GrammaticalFramework/gf-core.git synced 2026-04-23 11:42:49 -06:00
Code Issues Packages Projects Releases Wiki Activity

more predications

Browse Source
This commit is contained in:
aarne
2005-01-24 10:09:13 +00:00
parent 223bed1ba4
commit a6f4fd6da3
12 changed files with 139 additions and 52 deletions
Download Patch File Download Diff File Expand all files Collapse all files

8
lib/resource/danish/StructuralDan.gf
View File

@@ -83,10 +83,10 @@ concrete StructuralDan of Structural =
SomethingNP = nameNounPhrase (mkProperName "noget" NNeutr) ;
NothingNP = nameNounPhrase (mkProperName "intet" NNeutr) ;
CanVV = mkVerb "kunne" "kan" nonExist "kunne" "kunnet" nonExist ** {s1 = [] ; isAux = True} ;
CanKnowVV = mkVerb "kunne" "kan" nonExist "kunne" "kunnet" nonExist ** {s1 = [] ; isAux = True} ;
MustVV = mkVerb "måtte" "må" "mås" "måtte" "måttet" "må" ** {s1 = [] ; isAux = True} ; ---- ?
WantVV = mkVerb "ville" "vil" nonExist "ville" "villet" nonExist ** {s1 = [] ; isAux = True} ; ---
CanVV = mkVerb "kunne" "kan" nonExist "kunne" "kunnet" nonExist ** {s1 = [] ; s3 = []} ;
CanKnowVV = mkVerb "kunne" "kan" nonExist "kunne" "kunnet" nonExist ** {s1 = [] ; s3 = []} ;
MustVV = mkVerb "måtte" "må" "mås" "måtte" "måttet" "må" ** {s1 = [] ; s3 = []} ; ---- ?
WantVV = mkVerb "ville" "vil" nonExist "ville" "villet" nonExist ** {s1 = [] ; s3 = []} ; ---
EverywhereNP = advPost "overalt" ;
SomewhereNP = advPost ["et eller andet sted"] ; ---- ?

9
lib/resource/danish/TestResourceDan.gf
View File

@@ -57,8 +57,7 @@ lin
Green = mkAdjective "grøn" "grønt" "grøne" "grønnere" "grønnest" ;
Beg = extTransVerb (mkVerb "bede" "beder" "bedes" "bad" "bedt" "bed") [] ** {s3 = "at"} ;
Promise = extTransVerb (vNopart (vSpis "lov")) [] ** {isAux = False} ;
Promise2 = extTransVerb (vNopart (vSpis "lov")) [] ** {s3 = "att"} ;
Promise = extTransVerb (vNopart (vSpis "lov")) [] ** {s3 = "att"} ;
Wonder = extTransVerb (vNopart (vHusk "undr")) [] ;
Ask = extTransVerb (mkVerb "spørge" "spørger""spørges""spurgte""spurgt""spørg") [] ;
Tell = extTransVerb (mkVerb "fortælle" "fortæller" "fortælles"
@@ -66,4 +65,10 @@ lin
Look = extTransVerb (mkVerb "se" "ser" "ses" "så" "set" "sedd") []
; ---- ut
Try = extTransVerb (vNopart (vSpis "forsøg")) [] ** {s3 = "att"} ;
Important = extAdjective (aAbstrakt "viktig") ** {s2 = "for"} ;
Probable = extAdjective (aAbstrakt "sandsynlig") ;
Easy = extAdjective (aRod "let") ** {s2 = "for"} ;
} ;