exception NoWellTypedInterpretation
-module Environment :
+module EnvironmentP3 :
sig
type t
- val empty : t
+ val empty : string
val to_string : t -> string
val of_string : string -> t
end
Cic.context ->
Cic.metasenv ->
string ->
- Environment.t -> (* previous interpretation status *)
- Environment.t * (* new interpretation status *)
+ EnvironmentP3.t -> (* previous interpretation status *)
+ EnvironmentP3.t * (* new interpretation status *)
Cic.metasenv * (* new metasenv *)
Cic.term (* disambiguated term *)
end