produce morpho.xml with additional information: translit as 'orig' and all the morphologically possible values

Change-Id: I7e133c92985223427da47eee188885b37f96b2fa
diff --git a/nkjp2korap.xsl b/nkjp2korap.xsl
index 9bd3ce6..9362be4 100644
--- a/nkjp2korap.xsl
+++ b/nkjp2korap.xsl
@@ -541,6 +541,10 @@
           </xsl:if>
           <xsl:element name="fs" namespace="http://www.tei-c.org/ns/1.0">
             <xsl:element name="f" namespace="http://www.tei-c.org/ns/1.0">
+              <xsl:attribute name="name" select="'orig'"/>
+              <xsl:value-of select="tei:fs/tei:f[@name eq 'orth']/tei:string"/>
+            </xsl:element>
+            <xsl:element name="f" namespace="http://www.tei-c.org/ns/1.0">
               <xsl:attribute name="name" select="'lemma'"/>
               <xsl:value-of select="$my_choice-lex/tei:f[@name eq 'base']/tei:string"/>
             </xsl:element>
@@ -562,10 +566,56 @@
             </xsl:if>
           </xsl:element>
         </xsl:element>
+        <xsl:element name="f" namespace="http://www.tei-c.org/ns/1.0">
+          <xsl:attribute name="name" select="'interps'"/>
+          <xsl:for-each select="tei:fs/tei:f[@name eq 'interps']/tei:fs">
+            <xsl:element name="fs" namespace="http://www.tei-c.org/ns/1.0">
+              <xsl:attribute name="type" select="'alt'"/>
+              <xsl:if test="tei:f[@name eq 'msd']//tei:symbol/@xml:id = $my_choice-id">
+                <xsl:attribute name="n" select="'choice'"/>
+              </xsl:if>
+              <xsl:element name="f" namespace="http://www.tei-c.org/ns/1.0">
+                <xsl:attribute name="name" select="'lemma'"/>
+                <xsl:value-of select="tei:f[@name eq 'base']/tei:string"/>
+              </xsl:element>
+              <xsl:element name="f" namespace="http://www.tei-c.org/ns/1.0">
+                <xsl:attribute name="name" select="'pos'"/>
+                <xsl:value-of select="tei:f[@name eq 'ctag']/tei:symbol/@value"/>
+              </xsl:element>
+              <xsl:element name="f" namespace="http://www.tei-c.org/ns/1.0">
+                <xsl:attribute name="name" select="'msd'"/>
+                <xsl:apply-templates select="tei:f[@name eq 'msd']/*" mode="inside-interps">
+                  <xsl:with-param name="choice" select="$my_choice-id" as="xs:string" tunnel="yes"/>
+                </xsl:apply-templates>
+              </xsl:element>
+            </xsl:element>
+          </xsl:for-each>
+        </xsl:element>
       </xsl:element>
     </xsl:element>
   </xsl:template>
 
+  <xsl:template match="tei:vAlt" mode="inside-interps">
+    <xsl:copy select="." copy-namespaces="no">
+      <xsl:apply-templates mode="inside-interps" select="*"/>
+    </xsl:copy>
+  </xsl:template>
+
+  <xsl:template match="tei:symbol" mode="inside-interps">
+    <xsl:param name="choice" as="xs:string" tunnel="yes"/>
+    <xsl:copy select="." copy-namespaces="no">
+      <xsl:attribute name="value" select="
+          if (@value eq '') then
+            0
+          else
+            @value"/>
+<!-- the check above is to appease the validator, which won't allow for empty values of @value     -->
+      <xsl:if test="@xml:id eq $choice">
+        <xsl:attribute name="n" select="'choice'"/>
+      </xsl:if>
+    </xsl:copy>
+  </xsl:template>
+
   <!--   **************************        named entities      *******************      -->
   
   <xsl:template name="create_named">