morfologia diminutivos

Version.lsp

@@ -1,4 +1,4 @@
 ;;; -*- Mode: TDL; Coding: utf-8 -*-
 (in-package :common-lisp-user)
 
-(defparameter *grammar-version* "Portuguese (2022-08-10)")
+(defparameter *grammar-version* "Portuguese (2022-11-27_05:14:08_UTC)")

choices

@@ -82,26 +82,27 @@ form-fin-nf=on
   form-subtype7_supertype=form
   form-subtype8_name=em_que
   form-subtype8_supertype=form
-  feature1_name=dim
-  feature1_type=index
-  feature1_cat=noun
-  feature1_new=no
-  feature1_existing=bool
-  feature2_name=aug
-  feature2_type=index
-  feature2_cat=noun
-  feature2_new=no
-  feature2_existing=bool
-  feature3_name=abs
-  feature3_type=index
-  feature3_cat=noun
-  feature3_new=no
-  feature3_existing=bool
   feature4_name=hum
   feature4_type=index
   feature4_cat=noun
   feature4_new=no
   feature4_existing=bool
+  feature5_name=eval
+  feature5_type=index
+  feature5_cat=noun
+  feature5_new=yes
+    feature5_value1_name=diminutive
+      feature5_value1_supertype1_name=eval
+  feature7_name=aug
+  feature7_type=index
+  feature7_cat=noun
+  feature7_new=no
+  feature7_existing=bool
+  feature8_name=abs
+  feature8_type=index
+  feature8_cat=noun
+  feature8_new=no
+  feature8_existing=bool
 
 section=sentential-negation
 neg-exp=1
@@ -263,8 +264,8 @@ section=lexicon
     noun7_stem9_pred=_cão_n_rel
   noun8_name=dim
   noun8_supertypes=noun5
-    noun8_feat1_name=dim
-    noun8_feat1_value=+
+    noun8_feat1_name=eval
+    noun8_feat1_value=diminutive
   noun8_det=opt
   noun9_name=dim-masc
   noun9_supertypes=noun8
@@ -748,8 +749,8 @@ section=lexicon
   adj10_predcop=obl
   adj11_name=non-unif-dim
   adj11_supertypes=adj15
-    adj11_feat1_name=dim
-    adj11_feat1_value=+
+    adj11_feat1_name=eval
+    adj11_feat1_value=diminutive
     adj11_feat1_head=xarg
     adj11_stem1_orth=amarelinho
     adj11_stem1_pred=_amarelo_a_2_rel
@@ -821,24 +822,24 @@ section=lexicon
     adj16_stem1_pred=_amarelo_a_6_rel
   adj18_name=unif-dim
   adj18_supertypes=adj14
-    adj18_feat1_name=dim
-    adj18_feat1_value=+
+    adj18_feat1_name=eval
+    adj18_feat1_value=diminutive
     adj18_feat1_head=xarg
   adj19_name=fem-dim
   adj19_supertypes=adj14
     adj19_feat1_name=gender
     adj19_feat1_value=feminine
     adj19_feat1_head=xarg
-    adj19_feat2_name=dim
-    adj19_feat2_value=+
+    adj19_feat2_name=eval
+    adj19_feat2_value=diminutive
     adj19_feat2_head=xarg
   adj20_name=masc-dim
   adj20_supertypes=adj14
     adj20_feat1_name=gender
     adj20_feat1_value=masculine
     adj20_feat1_head=xarg
-    adj20_feat2_name=dim
-    adj20_feat2_value=+
+    adj20_feat2_name=eval
+    adj20_feat2_value=diminutive
     adj20_feat2_head=xarg
   aux1_name=ter
   aux1_sem=add-pred
@@ -1533,6 +1534,22 @@ section=morphology
       adj-pc2_lrt3_feat1_value=singular
       adj-pc2_lrt3_feat1_head=xarg
       adj-pc2_lrt3_lri1_inflecting=no
+  adj-pc3_name=a-eval
+  adj-pc3_obligatory=on
+  adj-pc3_order=suffix
+  adj-pc3_inputs=adj-pc2
+    adj-pc3_lrt1_name=noneval
+      adj-pc3_lrt1_lri1_inflecting=no
+    adj-pc3_lrt3_name=dim
+      adj-pc3_lrt3_feat1_name=eval
+      adj-pc3_lrt3_feat1_value=diminutive
+      adj-pc3_lrt3_feat1_head=xarg
+      adj-pc3_lrt3_lri1_inflecting=yes
+      adj-pc3_lrt3_lri1_orth=inho
+      adj-pc3_lrt3_lri2_inflecting=yes
+      adj-pc3_lrt3_lri2_orth=ito
+      adj-pc3_lrt3_lri3_inflecting=yes
+      adj-pc3_lrt3_lri3_orth=zinho
   cop-pc1_name=cop-tmp
   cop-pc1_obligatory=on
   cop-pc1_order=suffix

irules.tdl

@@ -289,6 +289,18 @@ a-pl-suffix :=
 %suffix (* s)
 a-pl-lex-rule.
 
+dim-suffix1 :=
+%suffix (* inho)
+dim-lex-rule.
+
+dim-suffix2 :=
+%suffix (* ito)
+dim-lex-rule.
+
+dim-suffix3 :=
+%suffix (* zinho)
+dim-lex-rule.
+
 cop-past-part-suffix :=
 %suffix (* ado)
 cop-past-part-lex-rule.

lexicon/dim-test-lexicon.tdl

@@ -0,0 +1,55 @@
+gato := masc-noun-lex &
+  [ STEM < "gato" >,
+    SYNSEM.LKEYS.KEYREL.PRED "_gato_n_rel" ].
+
+gata := fem-noun-lex &
+  [ STEM < "gata" >,
+    SYNSEM.LKEYS.KEYREL.PRED "_gata_n_rel" ].
+
+cachorro := masc-noun-lex &
+  [ STEM < "cachorro" >,
+    SYNSEM.LKEYS.KEYREL.PRED "_cachorro_n_rel" ].
+
+forte := uniform-adj-lex &
+		    [ STEM < "forte" >,
+		    SYNSEM.LKEYS.KEYREL.PRED "_forte_a_rel" ].
+
+aceso := non-uniform-adj-lex &
+		    [ STEM < "aceso" >,
+		    SYNSEM.LKEYS.KEYREL.PRED "_aceso_a_rel" ].
+
+feliz := uniform-adj-lex &
+		    [ STEM < "feliz" >,
+		    SYNSEM.LKEYS.KEYREL.PRED "_feliz_a_rel" ].
+
+voraz := uniform-adj-lex &
+		    [ STEM < "voraz" >,
+		    SYNSEM.LKEYS.KEYREL.PRED "_voraz_a_rel" ].
+
+fraco := non-uniform-adj-lex &
+		    [ STEM < "fraco" >,
+		    SYNSEM.LKEYS.KEYREL.PRED "_fraco_a_rel" ].
+
+lindo := non-uniform-adj-lex &
+		    [ STEM < "lindo" >,
+		    SYNSEM.LKEYS.KEYREL.PRED "_lindo_a_rel" ].
+
+bom := non-uniform-adj-lex &
+		    [ STEM < "bom" >,
+		    SYNSEM.LKEYS.KEYREL.PRED "_bom_a_rel" ].
+
+adorável := uniform-adj-lex &
+		    [ STEM < "adorável" >,
+		    SYNSEM.LKEYS.KEYREL.PRED "_adorável_a_rel" ].
+
+lambedor := non-uniform-adj-lex &
+		    [ STEM < "lambedor" >,
+		    SYNSEM.LKEYS.KEYREL.PRED "_lambedor_a_rel" ].
+
+incolor := uniform-adj-lex &
+		    [ STEM < "incolor" >,
+		    SYNSEM.LKEYS.KEYREL.PRED "_incolor_a_rel" ].
+
+adorável := non-uniform-adj-lex &
+		    [ STEM < "adorável" >,
+		    SYNSEM.LKEYS.KEYREL.PRED "_adorável_a_rel" ].