Half agreement

+Attr => +Sg+Gen, e.g. vuosttas girjjis => vuosmuu kirjeest

Define categories for use in pattern in the rule

List with adjectives, pronouns, numbers which has agreement in the target language, and not in the source language

<section-def-cats>
    <def-cat n="agreement-attr">
      <cat-item lemma="vuosttas" tags="adj.ord.attr.*"/>
      <cat-item lemma="vuosttaš" tags="adj.ord.attr.*"/>
      <cat-item lemma="aiddonas" tags="adj.*.attr.*"/>
      <cat-item lemma="aiddonas" tags="adj.attr.*"/>
      <cat-item lemma="dárbbašlaš" tags="adj.*.attr.*"/>
      <cat-item lemma="dárbbašlaš" tags="adj.attr.*"/>  ...

List with the tags in the noun, when the attribute should have Sg+Gen

<def-cat n="agreem-sg-gen">
      <cat-item tags="np.*.sg.gen.*"/>
      <cat-item tags="np.sg.gen.*"/>
      <cat-item tags="n.*.sg.gen.*"/>
      <cat-item tags="n.sg.gen.*"/>
      <cat-item tags="n.*.sg.ill.*"/>
      <cat-item tags="n.sg.ill.*"/>
      <cat-item tags="n.*.sg.loc.*"/>
      <cat-item tags="n.sg.loc.*"/>
      <cat-item tags="n.*.ess.*"/>
      <cat-item tags="n.ess.*"/>
      <cat-item tags="*.n.sg.gen.*"/>
      <cat-item tags="*.n.sg.ill.*"/>
      <cat-item tags="*.n.sg.loc.*"/>
      <cat-item tags="*.n.*.ess.*"/>
    </def-cat>

Define attributes, the tags to the left of Sg

    <def-attr n="a_npagree_type">
       <attr-item tags="adj"/>
       <attr-item tags="adj.ord"/>
       <attr-item tags="prn.ind"/>
       <attr-item tags="prn.dem"/>
       <attr-item tags="prn.itg"/>
       <attr-item tags="prn.rel"/>
       <attr-item tags="num"/>
    </def-attr>

Define macros

macro 1: add sg+gen

 <def-macro n="agreement-adj-ind-sg-gen-1Posit" npar="1">
        <let>
          <clip pos="1" side="tl" part="tags"/>
               <concat>
                 <clip pos="1" side="tl" part="a_npagree_type"/>
                 <lit-tag v="sg"/>
                 <lit-tag v="gen"/>
               </concat>
        </let>
    </def-macro>

Define pattern in the rule

    <rule comment="REGLA: agreement-attr n-sg-gen">
      <pattern>
        <pattern-item n="agreement-attr"/>
        <pattern-item n="agreem-sg-gen"/>
      </pattern>
      <action>
        <call-macro n="convert-deriv-1Posit"><with-param pos="2"/></call-macro>
        <call-macro n="remove-semtag-1Posit"><with-param pos="2"/></call-macro>
        <let><clip pos="2" side="tl" part="x_func"/><lit v=""/></let>
        <let><clip pos="2" side="tl" part="a_func"/><lit v=""/></let>
        <call-macro n="agreement-adj-ind-sg-gen-1Posit"><with-param pos="1"/></call-macro>