| Proof of ProofEngineTypes.proof
| Intermediate of Cic.metasenv
+type ng_status =
+ | ProofMode of NTacStatus.tac_status
+ | CommandMode of NEstatus.extra_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 *)
+ automation_cache:AutomationCache.cache;
baseuri: string;
- ng_status: NTactics.tac_status option;
+ ng_status: ng_status;
}
val dump_status : status -> unit
val get_stack: status -> Continuationals.Stack.t
val get_proof_context : status -> int -> Cic.context
val get_proof_conclusion : status -> int -> Cic.term
+val get_lexicon : status -> LexiconEngine.status
+val get_estatus : status -> NEstatus.extra_status
+val get_rstatus : status -> NRstatus.refiner_status
+val get_hstatus : status -> NCicUnifHint.db
+val get_library_db : status -> NCicLibrary.timestamp
+val get_dump : status -> (NRstatus.refiner_status -> NRstatus.refiner_status)
+val get_coercions: status -> NCicCoercion.db
val set_stack: Continuationals.Stack.t -> status -> status
val set_metasenv: Cic.metasenv -> status -> status
+val set_lexicon : LexiconEngine.status -> status -> status
+val set_coercions: NCicCoercion.db -> status -> status
+val set_estatus : NEstatus.extra_status -> status -> status
+val set_rstatus : NRstatus.refiner_status -> status -> status
+val set_hstatus : NCicUnifHint.db -> status -> status
+val set_library_db : NCicLibrary.timestamp -> status -> status
+val set_dump : (NRstatus.refiner_status -> NRstatus.refiner_status) -> status -> status