with Text_IO; use Text_IO;
package Lex is
	procedure Lexeme(lFile : Text_IO.File_Type; sFile : Text_IO.File_Type; fFile : File_Type; lFlag	:	Boolean; eFlag : Boolean; fFlag : Boolean);
end Lex;