real ([0-9]*\.[0-9]+)
nl   \n

%%
[ \t]+    ;
{real}     {
            yylval.cnum= ( struct complex *) malloc(sizeof(struct complex));
           sscanf(yytext,"%lf", &(yylval.cnum->a));
             return(INTEGER);}
{nl}   {  return ('\n'); }
.      {  return(yytext[0]);}
%%