blob: 16abb47aaf694bc34d53eb8f382bf98c4a14f0c0 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
|
open Util
type obligation_info = (Names.identifier * Term.types * bool * Intset.t) array
(* ident, type, opaque or transparent, dependencies *)
val set_default_tactic : Tacexpr.glob_tactic_expr -> unit
val add_definition : Names.identifier -> Term.constr -> Term.types ->
obligation_info -> unit
val add_mutual_definitions :
(Names.identifier * Term.constr * Term.types * obligation_info) list -> int array -> unit
val subtac_obligation : int * Names.identifier option * Topconstr.constr_expr option -> unit
val next_obligation : Names.identifier option -> unit
val solve_obligations : Names.identifier option -> Proof_type.tactic -> bool
val try_solve_obligations : Names.identifier option -> Proof_type.tactic -> unit
val show_obligations : Names.identifier option -> unit
val admit_obligations : Names.identifier option -> unit
|