%{

#define set_estado(x) BEGIN(_stack[_i]=x)
#define push_to_stack(x)  _stack[++_i]=YY_START; set_estado(x)
#define pop_back set_estado(_stack[--_i])

   #include <string.h>
   #include <ctype.h>


   #define MAX 1000


   int _i=0;
   int _stack[MAX];

   int i;
   int cont_idmat=19; 


%}

LETRA   [a-zA-Z\.:]
OP	[\+\-=]
NUMINT  [0-9]+
NUMREAL ({NUMINT}(\.|,){NUMINT}*)+
BLANK	[\n\t ]
%Start e1 e2 e3 e4 e5

%%

        set_estado(e1);

\<matematica\>{BLANK}*({LETRA}|{NUMINT})+{BLANK}*(({LETRA}|{NUMINT})*{BLANK}*)+\<\/matematica\>	{printf("\n<caligrafia>");
					 i=12;
					 while(yytext[i]!='<'){
						printf("%c", yytext[i]);
						i++;
					 }
					 printf("</caligrafia>\n");
					}
				
\<matematica\>{BLANK}*{OP}*{BLANK}*({NUMINT}|{NUMREAL})*{BLANK}*{LETRA}*{BLANK}*{OP}*({NUMINT}|{NUMREAL})*{BLANK}*\<\/matematica\>	{printf("\n<caligrafia>");
					 i=12;
					 while(yytext[i]!='<'){
						printf("%c", yytext[i]);
						i++;
					 }
					 printf("</caligrafia>\n");
					}

\<matematica\>{BLANK}*\\ast{BLANK}*\<\/matematica\>	printf("*");

\<matematica\>{BLANK}*{OP}*{BLANK}*({LETRA}|{NUMINT}|{NUMREAL})+{BLANK}*(({OP}|&lt;|&gt;)+{BLANK}*({LETRA}|{NUMINT}|{NUMREAL})+{BLANK}*)+\<\/matematica\>	{printf("\n<caligrafia>");
					 i=12;
					 while(yytext[i]!='<'){
						printf("%c", yytext[i]);
						i++;
					 }
					 printf("</caligrafia>\n");
					}

\<displaymat\>{BLANK}*\<enfasedois	{printf("<alin tipo=\"centrado\">\n<enfasedois");
					 push_to_stack(e4);}

<e4>\<\/displaymat\>	{printf("</alin>");
			 pop_back;}

\<displaymat\>\n	{printf("<matematica idmat=\"mat%d\">", cont_idmat++);
			 push_to_stack(e5);}


<e5>\<\/displaymat\>	{printf("</matematica>");
			 pop_back;}


\<matematica\>	printf("<matematica idmat=\"mat%d\">", cont_idmat++);
%%