Design and implement a lexical analyzer that recognizes the following tokens: num> 11213141516171819 ( I )* cdigit+(. digit+?(E(+1-Jdigit+)? cidentifier \ [ stmt stmtb stmb estmt stmt estmt> stmtb estmb estmt { end :if (cexpr>) ) ::#while ( : do while (expr) : : = switch ( ) : : break ; I continue ; ::retum cexpr cfor_stmt> cfor stmt> cassignstmt ccondition> expr : :sfor (assign-stmt>, ,)-stmt-list> : : expr> cterm> term * 1 / term> literal> : : = | ( [digit). The input for the lexical analyzer is a text file SOURCE.TXT consisting of several lines of text (a "program containing sequences of lexemes corresponding to the above definitions, whitespaces and comments. The input program can be incorrect so your lexical analyzer should generate error messages indicating the line(s) of these errors The output of your lexical analyzer consists of 2 text files ST.TXT and TOKENS.TXT 1. ST.TXT is the symbol table created by the lexical analyzer. Each line consists of three parts: line number -the lexeme (string) -type (string),being one of the following: keyword, identifier, num 2. TOKENS.TXT is the list of tokens produced by the lexical analyzer with the following structure: one line of input (in the order of appearance in SOURCE.TXT) -corresponding pairs "token, attribute", each in separate line in the order as they occur in the line -blank line The attribute of keyword, identifier or a number is the line number in the symbol table. The attribute of any other token is lexeme itself. The longest prefix of the input that can match any regular expression pi is taken as the next token