X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Fmatita%2FmatitaTypes.mli;h=f27f2a11ba69fbc7bc74eeebced9db4fe5a528c6;hb=f7d04edd37b51a7daa4e372be9439163f92648b6;hp=e425519c6434242d593619175c85a34fb89c8156;hpb=9e8c5d2163e701413517153f00a52dac1cd31ecd;p=helm.git diff --git a/helm/matita/matitaTypes.mli b/helm/matita/matitaTypes.mli index e425519c6..f27f2a11b 100644 --- a/helm/matita/matitaTypes.mli +++ b/helm/matita/matitaTypes.mli @@ -114,3 +114,14 @@ class type mathViewer = method show_uri_list : ?reuse:bool -> entry:mathViewer_entry -> UriManager.uri list -> unit end + +val qualify: status -> string -> string + +val get_current_proof: status -> ProofEngineTypes.proof +val get_proof_metasenv: status -> Cic.metasenv +val get_proof_context: status -> ProofEngineTypes.goal -> Cic.context +val get_proof_conclusion: status -> ProofEngineTypes.goal -> Cic.term +val get_stack: status -> Continuationals.Stack.t + +val set_stack: Continuationals.Stack.t -> status -> status +