| Proof of ProofEngineTypes.proof
| Intermediate of Cic.metasenv
+type ng_status =
+ | ProofMode of NTactics.tac_status
+ | CommandMode of LexiconEngine.status
+
type status = {
moo_content_rev: GrafiteMarshal.moo;
- proof_status: proof_status; (** logical status *)
- objects: UriManager.uri list; (** in-scope objects *)
+ proof_status: proof_status;
+ objects: UriManager.uri list;
coercions: CoercDb.coerc_db;
- universe:Universe.universe; (** universe of terms used by auto *)
+ universe:Universe.universe;
baseuri: string;
- ng_status: NTactics.tac_status option;
+ ng_status: ng_status;
}
val dump_status : status -> unit