- (** lexer for concrete syntax patterns (notation level 1) *)
-val level1_lexer: (string * string) Token.glexer
+val level1_pattern_lexer: (string * string) Token.glexer
+val level2_ast_lexer: (string * string) Token.glexer
+val level2_meta_lexer: (string * string) Token.glexer