GitHub/gf-core
1
0
Fork 1
mirror of https://github.com/GrammaticalFramework/gf-core.git synced 2026-05-09 03:02:50 -06:00
Code Issues Packages Projects Releases Wiki Activity

spanish works although with bugs

Browse Source
This commit is contained in:
aarne
2004-12-10 07:13:01 +00:00
parent 666496eee9
commit a3b75f842f
7 changed files with 196 additions and 232 deletions
Download Patch File Download Diff File Expand all files Collapse all files

67
lib/resource/spanish/TestResourceSpa.gf
View File

@@ -1,48 +1,47 @@
--# -path=.:../romance:../abstract:../../prelude
concrete TestResourceIta of TestResource =
RulesIta, StructuralIta ** open Prelude, TypesIta, MorphoIta, SyntaxIta in {
concrete TestResourceSpa of TestResource =
RulesSpa, StructuralSpa ** open Prelude, TypesSpa, MorphoSpa, SyntaxSpa in {
flags startcat=Phr ; lexer=text ; parser=chart ; unlexer=text ;
lin
Big = mkAdjDegrTale "grande" adjPre ;
Small = mkAdjDegrSolo "piccolo" adjPre ;
Old = mkAdjDegrLong (mkAdj "vecchio" "vecchia" "vecchi" "vecchie" "vecchiamente")
adjPre ;
Young = mkAdjDegrTale "giovane" adjPre ;
Happy = mkAdjDegrTale "felice" adjPost ;
Big = mkAdjDegrUtil "grande" "grandes"adjPre ;
Small = mkAdjDegrSolo "pequeño" adjPre ;
Old = mkAdjDegrSolo "viejo" adjPre ;
Young = mkAdjDegrUtil "joven" "jovenes"adjPre ;
Happy = mkAdjDegrUtil "feliz" "felices" adjPost ;
American = mkAdjective (adjSolo "americano") adjPost ;
Finnish = mkAdjective (adjTale "finlandese") adjPost ;
Married = mkAdjCompl (adjSolo "sposato") adjPost {s2 = [] ; c = dative} ;
Man = mkCNom (numForms "uomo" "uomini") Masc ;
Woman = mkCNom (nomRana "donna") Fem ;
Car = mkCNom (nomRana "macchina") Fem ;
Light = mkCNom (nomSale "luce") Fem ;
House = mkCNom (nomRana "casa") Fem ;
Finnish = mkAdjective (adjUtil "finlandes" "finlandeses") adjPost ;
Married = mkAdjCompl (adjSolo "casado") adjPost {s2 = "con" ; c = accusative} ;
Man = mkCNom (nomVino "hombre") Masc ;
Woman = mkCNom (nomPilar "mujer") Fem ;
Car = mkCNom (nomVino "coche") Masc ;
Light = mkCNom (nomPilar "luz") Fem ;
House = mkCNom (nomVino "casa") Fem ;
Wine = mkCNom (nomVino "vino") Masc ;
Bottle = mkCNom (nomRana "bottiglia") Fem ;
Bottle = mkCNom (nomVino "botella") Fem ;
Bar = mkCNom (nomTram "bar") Masc ;
Walk = verbPres (amare_7 "camminare") AHabere ;
Run = (verbPres (correre_41 "correre") AHabere) ;
Send = mkTransVerbDir (verbPres (amare_7 "mandare") AHabere) ;
Love = mkTransVerbDir (verbPres (amare_7 "amare") AHabere) ;
Wait = mkTransVerbCas (verbPres (amare_7 "aspettare") AHabere) dative ;
Drink = mkTransVerbDir (verbPres (bere_29 "bere") AHabere) ;
Give = mkDitransVerb (verbPres (dare_17 "dare") AHabere) [] dative [] accusative ;
Prefer = mkDitransVerb (verbPres (finire_103 "preferire") AHabere) [] accusative [] dative ;
Say = verbSent (verbPres (dire_44 "dire") AHabere) Ind Ind ;
Prove = verbSent (verbPres (amare_7 "dimostrare") AHabere) Ind Ind ;
SwitchOn = mkTransVerbDir (verbPres (amare_7 "allumare") AHabere) ;
SwitchOff = mkTransVerbDir (verbPres (spegnere_89 "spegnere") AHabere) ;
Mother = funGen (mkCNom (nomSale "madre") Fem) ;
Walk = verbPres (zurrar_3 "pasear") AHabere ;
---- Run = (verbPres (correre_41 "correre") AHabere) ;
Send = mkTransVerbDir (verbPres (zurrar_3 "mandar") AHabere) ;
Love = mkTransVerbDir (verbPres (zurrar_3 "amar") AHabere) ;
Wait = mkTransVerbCas (verbPres (zurrar_3 "esperar") AHabere) dative ;
---- Drink = mkTransVerbDir (verbPres (bere_29 "bere") AHabere) ;
---- Give = mkDitransVerb (verbPres (dare_17 "dare") AHabere) [] dative [] accusative ;
Prefer = mkDitransVerb (verbPres (zurrir_5 "preferir") AHabere) [] accusative [] dative ;
---- Say = verbSent (verbPres (dire_44 "dire") AHabere) Ind Ind ;
Prove = verbSent (verbPres (zurrar_3 "demonstrar") AHabere) Ind Ind ;
---- SwitchOn = mkTransVerbDir (verbPres (zurrar_3 "encender") AHabere) ;
SwitchOff = mkTransVerbDir (verbPres (zurrar_3 "apagar") AHabere) ;
Mother = funGen (mkCNom (nomVino "madre") Fem) ;
Uncle = funGen (mkCNom (nomVino "zio") Masc) ;
Connection = mkCNom (nomSale "connessione") Fem **
{s2 = [] ; c = CPrep P_da ; s3 = [] ; c3 = dative} ;
Connection = mkCNom (nomPilar "connexión") Fem **
{s2 = [] ; c = CPrep P_de ; s3 = [] ; c3 = dative} ;
Well = ss "bene" ;
Always = ss "sempre" ;
Well = ss "bien" ;
Always = ss "siempre" ;
John = mkProperName "Giovanni" Masc ;
John = mkProperName "Juan" Masc ;
Mary = mkProperName "Maria" Fem ;
}