and coInductiveFun =
string * term * term (* name, type, body *)
-(* a metasenv is a list of declarations of metas *)
+(* a metasenv is a list of declarations of metas in declarations *)
+(* order (i.e. [oldest ; ... ; newest]). Older variables can not *)
+(* depend on new ones. *)
and conjecture = int * context * term
and metasenv = conjecture list
-(* a metasenv is a list of declarations of metas *)
+(* a metasenv is a list of declarations of metas in declarations *)
+(* order (i.e. [oldest ; ... ; newest]). Older variables can not *)
+(* depend on new ones. *)
and annconjecture = id * int * anncontext * annterm
and annmetasenv = annconjecture list