GitHub/gf-core
1
0
Fork 1
mirror of https://github.com/GrammaticalFramework/gf-core.git synced 2026-05-20 00:22:51 -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/swedish/StructuralSwe.gf
View File

@@ -82,10 +82,10 @@ concrete StructuralSwe of Structural =
SomethingNP = nameNounPhrase (mkProperName "någonting" NNeutr) ;
NothingNP = nameNounPhrase (mkProperName "ingenting" NNeutr) ;
CanVV = mkVerb "kunna" "kan" "kunn" "kunde" "kunnat" "kunnen" ** {isAux = True} ;
CanKnowVV = mkVerb "kunna" "kan" "kunn" "kunde" "kunnat" "kunnen" ** {isAux = True} ;
MustVV = mkVerb "få" "måste" "få" "fick" "måst" "måst" ** {isAux = True} ; ---
WantVV = mkVerb "vilja" "vill" "vilj" "ville" "velat" "velad" ** {isAux = True} ; ---
CanVV = mkVerb "kunna" "kan" "kunn" "kunde" "kunnat" "kunnen" ** {s3 = []} ;
CanKnowVV = mkVerb "kunna" "kan" "kunn" "kunde" "kunnat" "kunnen" ** {s3 = []} ;
MustVV = mkVerb "få" "måste" "få" "fick" "måst" "måst" ** {s3 = []} ;
WantVV = mkVerb "vilja" "vill" "vilj" "ville" "velat" "velad" ** {s3 = []} ;
EverywhereNP = advPost "varstans" ;
SomewhereNP = advPost "någonstans" ;

10
lib/resource/swedish/TestResourceSwe.gf
View File

@@ -57,10 +57,16 @@ lin
Paint = extTransVerb (vNopart (vTala "mål")) [] ;
Green = aFin "grön" ;
Beg = extTransVerb (mkVerbPart "be" "ber" "be" "bad" "bett" "bedd" []) [] ** {s3 = "att"} ;
Promise = extTransVerb (vNopart (vTala "lov")) [] ** {isAux = False} ;
Promise2 = extTransVerb (vNopart (vTala "lov")) [] ** {s3 = "att"} ;
Promise = extTransVerb (vNopart (vTala "lov")) [] ** {s3 = "att"} ;
Wonder = extTransVerb (vNopart (vTala "undr")) [] ;
Ask = extTransVerb (vNopart (vTala "fråg")) [] ;
Tell = extTransVerb (vNopart (vTala "berätt")) [] ;
Look = extTransVerb (mkVerbPart "se" "ser" "se" "såg" "sett" "sedd" "ut") [] ;
Try = extTransVerb (vNopart (vLeka "försök")) [] ** {s3 = "att"} ;
Important = extAdjective (aFin "viktig") ** {s2 = "för"} ;
Probable = extAdjective (aFin "sannolik") ;
Easy = extAdjective (aAbstrakt "lätt") ** {s2 = "för"} ;
} ;