mirror of
https://github.com/GrammaticalFramework/gf-core.git
synced 2026-04-28 14:02:50 -06:00
Added French for new API. Started alpha conv. Fixed bugs.
This commit is contained in:
34
lib/resource-0.6/french/TestResourceFre.gf
Normal file
34
lib/resource-0.6/french/TestResourceFre.gf
Normal file
@@ -0,0 +1,34 @@
|
||||
--# -path=.:../romance:../abstract:../../prelude
|
||||
|
||||
concrete TestResourceFre of TestResource = StructuralFre ** open Prelude, TypesFre, MorphoFre, SyntaxFre in {
|
||||
|
||||
flags startcat=Phr ; lexer=text ; parser=chart ; unlexer=text ;
|
||||
|
||||
lin
|
||||
Big = mkAdjDegrReg "grand" adjPre ;
|
||||
Small = mkAdjDegrReg "petit" adjPre ;
|
||||
Old = mkAdjDegrLong (mkAdj "vieux" "vieux" "vieille") adjPre ;
|
||||
Young = mkAdjDegrLong (adjJeune "jeune") adjPre ;
|
||||
Man = mkCNomReg "homme" Masc ;
|
||||
Woman = mkCNomReg "femme" Fem ;
|
||||
Car = mkCNomReg "voiture" Fem ;
|
||||
Light = mkCNomReg "lumière" Fem ;
|
||||
House = mkCNomReg "maison" Fem ;
|
||||
Walk = verbPres (conj1aimer "marcher") ;
|
||||
Run = verbPres (conj3courir "courir") ;
|
||||
Send = mkTransVerbDir (verbPres (conj1envoyer "envoyer")) ;
|
||||
Love = mkTransVerbDir (verbPres (conj1aimer "aimer")) ;
|
||||
Wait = mkTransVerbDir (verbPres (conj3rendre "attendre")) ;
|
||||
Say = verbSent (verbPres (conj3dire "dire")) Ind Ind ;
|
||||
Prove = verbSent (verbPres (conj1aimer "démontrer")) Ind Ind ;
|
||||
SwitchOn = mkTransVerbDir (verbPres (conj1aimer "allumer")) ;
|
||||
SwitchOff = mkTransVerbDir (verbPres (conj3peindre "éteindre")) ;
|
||||
Mother = funDe (mkCNomReg "mère" Fem) ;
|
||||
Uncle = funDe (mkCNomReg "oncle" Masc) ;
|
||||
|
||||
Well = ss "bien" ;
|
||||
Always = ss "toujours" ;
|
||||
|
||||
John = mkProperName "Jean" Masc ;
|
||||
Mary = mkProperName "Marie" Fem ;
|
||||
}
|
||||
Reference in New Issue
Block a user