val get : unit -> Proof_global.t optionval set : Proof_global.t option -> unitval freeze : marshallable:bool -> Proof_global.t optionval unfreeze : Proof_global.t -> unit
exception NoCurrentProof
val there_are_pending_proofs : unit -> boolval get_open_goals : unit -> intval set_terminator : Proof_global.proof_terminator -> unitval give_me_the_proof : unit -> Proof.tval give_me_the_proof_opt : unit -> Proof.t optionval get_current_proof_name : unit -> Names.Id.tval simple_with_current_proof : (unit Proofview.tactic -> Proof.t -> Proof.t) -> unitval with_current_proof : (unit Proofview.tactic -> Proof.t -> Proof.t * 'a) -> 'aval install_state : Proof_global.t -> unitval return_proof : ?allow_partial:bool -> unit -> Proof_global.closed_proof_outputval close_future_proof : opaque:Proof_global.opacity_flag -> feedback_id:Stateid.t -> Proof_global.closed_proof_output Future.computation -> Proof_global.closed_proofval close_proof : opaque:Proof_global.opacity_flag -> keep_body_ucst_separate:bool -> Future.fix_exn -> Proof_global.closed_proofval discard_all : unit -> unitval update_global_env : unit -> unitval get_current_context : unit -> Evd.evar_map * Environ.envval get_all_proof_names : unit -> Names.Id.t listval copy_terminators : src:Proof_global.t option -> tgt:Proof_global.t option -> Proof_global.t option