improving the smartness of ParadigmsFre.mkV, leading to over 200 improvements in DictionaryFre

This commit is contained in:
aarne
2016-09-01 12:08:16 +00:00
parent 9a92e04210
commit 47116254ed
2 changed files with 5 additions and 4 deletions

View File

@@ -224,8 +224,9 @@ oper v_besch101 : Str -> VerbeN = \s -> mkNV (conj s) ; --- to do
_ + "ir" => conj2finir parler ;
_ + "re" => conj3rendre parler ;
_ + "éger" => conj1assiéger parler ;
_ + ("emer" | "ener" | "eper" | "eser" | "ever") => conj1peser parler ;
_ + ("eler" | "eter") => conj1jeter parler ;
_ + "éder" => conj1céder parler ;
_ + ("écer" | "éder" | "éler" | "éner" | "éper" | "érer" | "éser" | "éter") => conj1céder parler ;
_ + "cer" => conj1placer parler ;
_ + "ger" => conj1manger parler ;
_ + "yer" => conj1payer parler ;

View File

@@ -11256,8 +11256,8 @@ lin faro_N = mkN "faro" ; -- UWN
lin farrier_N = mkN "maréchal-ferrant" masculine ; -- tocheck
lin far_seeing_A = mkA "long" ; -- UWN
lin far_sighted_A = mkA "hypermétrope" ; -- tocheck
lin fart_N = mkN "pet" masculine ; -- tocheck
lin fart_V = mkV (mkV "péter") ; -- tocheck
lin fart_N = mkN "pet" masculine ;
lin fart_V = mkV "péter" ;
lin farthing_N = mkN "farthing" masculine ; -- tocheck
lin fartlek_N = mkN "fartlek" ; -- UWN
lin fasces_N = mkN "faisceau" masculine ; -- tocheck
@@ -16593,7 +16593,7 @@ lin kibble_N = mkN "concasser" ; -- tocheck
lin kibbutz_N = mkN "kibboutz" masculine ; -- tocheck
lin kick_N = mkN "coup de pied" "coups de pied" masculine ;
lin kick_V = mkV (mkV "donner") "un coup de pied" ;
lin kick_V2 = mkV2 (mkV (mkV "donner") "un coup de pied") ;
lin kick_V2 = mkV2 (mkV (mkV "donner") "un coup de pied") P.dative ;
lin kick_about_V2 = prepV2 OP_kick_V OP_about_Prep ; -- guess-p-verb
lin kick_around_V2 = prepV2 OP_kick_V OP_around_Prep ; -- guess-p-verb
lin kick_around_with_V2 = prepV2 (advV OP_kick_V OP_around_Adv ) OP_with_Prep ; -- guess-p-verb