val add_level2_ast_keyword: string -> unit (** non idempotent *)
val remove_level2_ast_keyword: string -> unit (** non idempotent *)
val add_level2_ast_keyword: string -> unit (** non idempotent *)
val remove_level2_ast_keyword: string -> unit (** non idempotent *)