(* $Id$ *) (*i*) open Names open Rawterm (*i*) (* Syntactic definitions. *) val declare_syntactic_definition : identifier -> rawconstr -> unit val search_syntactic_definition : identifier -> rawconstr