type binding = string * (value_type * value)
type t = binding list
+val declaration_of_var: CicNotationPt.pattern_variable -> declaration
+val value_of_term: CicNotationPt.term -> value
+val term_of_value: value -> CicNotationPt.term
+val well_typed: value_type -> value -> bool
+
(** {2 Environment lookup} *)
val lookup_value: t -> string -> value