french verbs

This commit is contained in:
aarne
2004-11-29 14:43:17 +00:00
parent 4564fd2f99
commit 75d02bfcc7
6 changed files with 124 additions and 105 deletions

View File

@@ -66,7 +66,7 @@ param
VForm = InfImp | Indic Person | Past Number | PPart ;
oper
VerbP3 : Type = SS1 VForm ;
VerbP3 : Type = {s : VForm => Str} ;
-- A full verb can moreover have a particle.

View File

@@ -1,4 +1,4 @@
resource ConjugNancy = open TypesFre, MorphoFre in {
resource ConjugNancy = open Prelude, TypesFre, MorphoFre in {
oper VerbeN = {s : VForm => Str} ;
oper mkNV : Verbe -> VerbeN = \ve ->
@@ -6,6 +6,13 @@ oper mkNV : Verbe -> VerbeN = \ve ->
oper conj : Str -> Verbe = conj1aimer ; --- temp. default
oper v_nancy100inf : Str -> VerbeN = \ve -> {s = table {
Inf => ve ;
_ => nonExist
}
} ;
oper v_nancy1 : Str -> VerbeN = \s -> mkNV (conjAvoir s) ;
oper v_nancy2 : Str -> VerbeN = \s -> mkNV (conjÊtre s) ;
-- 3-5 not used

View File

@@ -0,0 +1,3 @@
abstract TestVerbesAbs = TestResource, VerbesAbs ** {
fun UseVN : VN -> V ;
}

View File

@@ -0,0 +1,8 @@
--# -path=.:../romance:../abstract:../../prelude
concrete TestVerbesFre of TestVerbesAbs =
TestResourceFre, VerbesFre ** open TypesFre in {
lin UseVN ve = verbPres ve.s AHabere ; ---- VEsse
}

View File

@@ -2,20 +2,19 @@ abstract VerbesAbs = { --- Categories ** {
cat VN ; --- temporarily
{- --- temp. remove defective verbs
fun accroireVN : VN ;
fun accroîtreVN : VN ;
fun advenirVN : VN ;
fun apparoirVN : VN ;
---- fun apparoirVN : VN ;
fun arguerVN : VN ;
fun assavoirVN : VN ;
fun avenirVN : VN ;
---- fun avenirVN : VN ;
fun bienvenirVN : VN ;
fun braireVN : VN ;
fun bruireVN : VN ;
fun chaloirVN : VN ;
fun comparoirVN : VN ;
---- fun bruireVN : VN ;
---- fun chaloirVN : VN ;
---- fun comparoirVN : VN ;
fun contredireVN : VN ;
fun contrefoutreVN : VN ;
fun corrompreVN : VN ;
@@ -26,7 +25,7 @@ fun d
fun décroîtreVN : VN ;
fun dédireVN : VN ;
fun dépourvoirVN : VN ;
fun douerVN : VN ;
---- fun douerVN : VN ;
fun échoirVN : VN ;
fun écloreVN : VN ;
fun émouvoirVN : VN ;
@@ -34,8 +33,8 @@ fun encloreVN : VN ;
fun endêverVN : VN ;
fun ensuivreVN : VN ;
fun esterVN : VN ;
fun férirVN : VN ;
fun forcloreVN : VN ;
---- fun férirVN : VN ;
---- fun forcloreVN : VN ;
fun forfaireVN : VN ;
fun foutreVN : VN ;
fun frireVN : VN ;
@@ -43,28 +42,27 @@ fun g
fun inclureVN : VN ;
fun interdireVN : VN ;
fun interrompreVN : VN ;
fun issirVN : VN ;
---- fun issirVN : VN ;
fun luireVN : VN ;
fun malfaireVN : VN ;
fun maudireVN : VN ;
---- fun maudireVN : VN ;
fun médireVN : VN ;
fun méfaireVN : VN ;
fun messeoirVN : VN ;
fun occireVN : VN ;
---- fun occireVN : VN ;
fun occlureVN : VN ;
fun paîtreVN : VN ;
fun parfaireVN : VN ;
---- fun parfaireVN : VN ;
fun partirVN : VN ;
fun prédireVN : VN ;
fun prévaloirVN : VN ;
fun prévoirVN : VN ;
fun promouvoirVN : VN ;
fun querirVN : VN ;
fun quérirVN : VN ;
fun raserVN : VN ;
fun rassirVN : VN ;
---- fun rassirVN : VN ;
fun ravoirVN : VN ;
fun reclureVN : VN ;
---- fun reclureVN : VN ;
fun recroîtreVN : VN ;
fun reluireVN : VN ;
fun renaîtreVN : VN ;
@@ -75,15 +73,16 @@ fun rompreVN : VN ;
fun saillirVN : VN ;
fun seoirVN : VN ;
fun sortirVN : VN ;
fun sourdreVN : VN ;
fun stupéfaireVN : VN ;
---- fun sourdreVN : VN ;
---- fun stupéfaireVN : VN ;
fun suffireVN : VN ;
fun taireVN : VN ;
fun tistreVN : VN ;
fun titreVN : VN ;
---- fun tistreVN : VN ;
---- fun titreVN : VN ;
fun urgerVN : VN ;
fun saillirVN : VN ;
-}
fun saillir2VN : VN ;
fun accéderVN : VN ;
fun accélérerVN : VN ;

View File

@@ -4,93 +4,95 @@
-- Translated to GF by Aarne Ranta
concrete VerbesFre of VerbesAbs = --- CategoriesFre **
open TypesFre, ConjugNancy in {
open TypesFre, MorphoFre, ConjugNancy in {
lincat VN = {s : VForm => Str} ; --- aux : VAux} ;
{- --- remove deficient verbs
-- {- --- remove deficient verbs
lin accroireVN = v_nancy100inf "accroire" ; -- seul infin
lin accroîtreVN = v_nancy73 "accroître" ; --- diff î
lin advenirVN = v_nancy23 "advenir" ; --- infin et 3 pers
--- lin apparoirVN = v_nancy100 "apparoir" ; -- infin, 3sg pres appert
lin arguerVN = v_nancy6 "arguer" ;
lin assavoirVN = v_nancy100inf "assavoir" ; -- seul inf
--- lin avenirVN = v_nancy23 "avenir" ; --- seul part.pres
lin bienvenirVN = v_nancy100inf "bienvenir" ; --- seul inf
lin braireVN = v_nancy61 "braire" ;
--- lin bruireVN = v_nancy100 "bruire" ; --- conj2Finir
--- lin chaloirVN = v_nancy100 "chaloir" ; --- 3p, chaut
--- lin comparoirVN = v_nancy100 "comparoir" ; --- infint, pr.pt comparant
lin contredireVN = v_nancy78 "contredire" ;
lin contrefoutreVN = v_nancy53 "contrefoutre" ;
lin corrompreVN = v_nancy53 "corrompre" ;
lin courbaturerVN = v_nancy6 "courbaturer" ; --- alt. pp courbatu
lin courreVN = v_nancy100inf "courre" ;
lin déchoirVN = v_nancy52 "déchoir" ; --- incompl
lin décloreVN = v_nancy70 "déclore" ; --- seul inf et pp
lin décroîtreVN = v_nancy67 "décroître" ;
lin dédireVN = v_nancy78 "dédire" ;
lin dépourvoirVN = v_nancy40 "dépourvoir" ;
--- lin douerVN = v_nancy6 "douer" ; --- seul pp
lin échoirVN = v_nancy52 "échoir" ;
lin écloreVN = v_nancy70 "éclore" ;
lin émouvoirVN = v_nancy44 "émouvoir" ;
lin encloreVN = v_nancy70 "enclore" ;
lin endêverVN = v_nancy100inf "endêver" ;
lin ensuivreVN = v_nancy75 "ensuivre" ; --- seul inf, p pres, 3. pers
lin esterVN = v_nancy100inf "ester" ;
--- lin férirVN = v_nancy100 "férir" ; --- seul "sans coup férir", "féru de"
--- lin forcloreVN = v_nancy100 "forclore" ; --- seul inf, pp
lin forfaireVN = v_nancy62 "forfaire" ; --- incompl
lin foutreVN = v_nancy53 "foutre" ; --- incompl
lin frireVN = v_nancy81 "frire" ; --- incompl
lin gésirVN = mkNV (conj3gésir "gésir") ;
lin inclureVN = v_nancy71 "inclure" ;
lin interdireVN = v_nancy78 "interdire" ;
lin interrompreVN = v_nancy53 "interrompre" ;
--- lin issirVN = v_nancy100 "issir" ; --- seul pp issu
lin luireVN = v_nancy82 "luire" ;
lin malfaireVN = v_nancy100inf "malfaire" ;
--- lin maudireVN = v_nancy100 "maudire" ; --- finir sauf pp maudit
lin médireVN = v_nancy78 "médire" ; --- sauf médisez
lin méfaireVN = v_nancy100inf "méfaire" ;
lin messeoirVN = v_nancy50 "messeoir" ;
--- lin occireVN = v_nancy100 "occire" ; --- seul inf, pp occis
lin occlureVN = v_nancy71 "occlure" ;
lin paîtreVN = v_nancy66 "paître" ;
--- lin parfaireVN = v_nancy62 "parfaire" ; --- seul inf, pp
-- lin partirVN = v_nancy100 "partir" ; -- entrée séparée pour v trans
lin prédireVN = v_nancy78 "prédire" ;
lin prévaloirVN = v_nancy47 "prévaloir" ;
lin prévoirVN = v_nancy39 "prévoir" ;
lin promouvoirVN = v_nancy44 "promouvoir" ; --- incompl
-- lin querirVN = v_nancy100 "querir" ; -- non dans B ; typo ?
lin quérirVN = v_nancy100inf "quérir" ;
lin raserVN = v_nancy6 "raser" ;
--- lin rassirVN = v_nancy100 "rassir" ; --- inf, pp rassi
lin ravoirVN = v_nancy100inf "ravoir" ;
--- lin reclureVN = v_nancy100 "reclure" ; --- inf, pp reclus
lin recroîtreVN = v_nancy67 "recroître" ;
lin reluireVN = v_nancy82 "reluire" ;
lin renaîtreVN = v_nancy65 "renaître" ; --- rare pp
lin repaîtreVN = v_nancy66 "repaître" ;
lin résoudreVN = mkNV (conj3résoudre "résoudre") ;
lin résulterVN = v_nancy6 "résulter" ; --- incompl
lin rompreVN = v_nancy53 "rompre" ;
lin saillirVN = v_nancy29 "saillir" ; --- incompl
lin saillir2VN = v_nancy10 "saillir" ; --- incompl
-- lin seoirVN = mkNV (conj3seoir "seoir") ; -- duplic
--- lin sortirVN = v_nancy100 "sortir" ; -- juridique, sortissait
--- lin sourdreVN = v_nancy100 "sourdre" ; --- incompl: seul 3pers indic
--- lin stupéfaireVN = v_nancy100 "stupéfaire" ; --- incompl
lin suffireVN = v_nancy81 "suffire" ;
lin taireVN = v_nancy63 "taire" ;
--- lin tistreVN = v_nancy100 "tistre" ; --- seul pp tissu
--- lin titreVN = v_nancy100 "titre" ; --- variante de tistre
lin urgerVN = v_nancy8 "urger" ; --- seul 3 pres
lin accroireVN = v_nancy100 "accroire" ;
lin accroîtreVN = v_nancy100 "accroître" ;
lin advenirVN = v_nancy100 "advenir" ;
lin apparoirVN = v_nancy100 "apparoir" ;
lin arguerVN = v_nancy100 "arguer" ;
lin assavoirVN = v_nancy100 "assavoir" ;
lin avenirVN = v_nancy100 "avenir" ;
lin bienvenirVN = v_nancy100 "bienvenir" ;
lin braireVN = v_nancy100 "braire" ;
lin bruireVN = v_nancy100 "bruire" ;
lin chaloirVN = v_nancy100 "chaloir" ;
lin comparoirVN = v_nancy100 "comparoir" ;
lin contredireVN = v_nancy100 "contredire" ;
lin contrefoutreVN = v_nancy100 "contrefoutre" ;
lin corrompreVN = v_nancy100 "corrompre" ;
lin courbaturerVN = v_nancy100 "courbaturer" ;
lin courreVN = v_nancy100 "courre" ;
lin déchoirVN = v_nancy100 "déchoir" ;
lin décloreVN = v_nancy100 "déclore" ;
lin décroîtreVN = v_nancy100 "décroître" ;
lin dédireVN = v_nancy100 "dédire" ;
lin dépourvoirVN = v_nancy100 "dépourvoir" ;
lin douerVN = v_nancy100 "douer" ;
lin échoirVN = v_nancy100 "échoir" ;
lin écloreVN = v_nancy100 "éclore" ;
lin émouvoirVN = v_nancy100 "émouvoir" ;
lin encloreVN = v_nancy100 "enclore" ;
lin endêverVN = v_nancy100 "endêver" ;
lin ensuivreVN = v_nancy100 "ensuivre" ;
lin esterVN = v_nancy100 "ester" ;
lin férirVN = v_nancy100 "férir" ;
lin forcloreVN = v_nancy100 "forclore" ;
lin forfaireVN = v_nancy100 "forfaire" ;
lin foutreVN = v_nancy100 "foutre" ;
lin frireVN = v_nancy100 "frire" ;
lin gésirVN = v_nancy100 "gésir" ;
lin inclureVN = v_nancy100 "inclure" ;
lin interdireVN = v_nancy100 "interdire" ;
lin interrompreVN = v_nancy100 "interrompre" ;
lin issirVN = v_nancy100 "issir" ;
lin luireVN = v_nancy100 "luire" ;
lin malfaireVN = v_nancy100 "malfaire" ;
lin maudireVN = v_nancy100 "maudire" ;
lin médireVN = v_nancy100 "médire" ;
lin méfaireVN = v_nancy100 "méfaire" ;
lin messeoirVN = v_nancy100 "messeoir" ;
lin occireVN = v_nancy100 "occire" ;
lin occlureVN = v_nancy100 "occlure" ;
lin paîtreVN = v_nancy100 "paître" ;
lin parfaireVN = v_nancy100 "parfaire" ;
lin partirVN = v_nancy100 "partir" ;
lin prédireVN = v_nancy100 "prédire" ;
lin prévaloirVN = v_nancy100 "prévaloir" ;
lin prévoirVN = v_nancy100 "prévoir" ;
lin promouvoirVN = v_nancy100 "promouvoir" ;
lin querirVN = v_nancy100 "querir" ;
lin quérirVN = v_nancy100 "quérir" ;
lin raserVN = v_nancy100 "raser" ;
lin rassirVN = v_nancy100 "rassir" ;
lin ravoirVN = v_nancy100 "ravoir" ;
lin reclureVN = v_nancy100 "reclure" ;
lin recroîtreVN = v_nancy100 "recroître" ;
lin reluireVN = v_nancy100 "reluire" ;
lin renaîtreVN = v_nancy100 "renaître" ;
lin repaîtreVN = v_nancy100 "repaître" ;
lin résoudreVN = v_nancy100 "résoudre" ;
lin résulterVN = v_nancy100 "résulter" ;
lin rompreVN = v_nancy100 "rompre" ;
lin saillirVN = v_nancy100 "saillir" ;
lin seoirVN = v_nancy100 "seoir" ;
lin sortirVN = v_nancy100 "sortir" ;
lin sourdreVN = v_nancy100 "sourdre" ;
lin stupéfaireVN = v_nancy100 "stupéfaire" ;
lin suffireVN = v_nancy100 "suffire" ;
lin taireVN = v_nancy100 "taire" ;
lin tistreVN = v_nancy100 "tistre" ;
lin titreVN = v_nancy100 "titre" ;
lin urgerVN = v_nancy100 "urger" ;
lin saillirVN = v_nancy10 "saillir" ;
-}
lin accéderVN = v_nancy10 "accéder" ;