-val qualify: MatitaTypes.status -> string -> string
-
-val get_proof_status: MatitaTypes.status -> ProofEngineTypes.status
-val get_proof_metasenv: MatitaTypes.status -> Cic.metasenv
-val get_proof_context: MatitaTypes.status -> Cic.context
-val get_proof_conclusion: MatitaTypes.status -> Cic.term
-