module GOAL:sig
..end
type
t = {
|
mutable simplified : |
|
mutable time : |
|
mutable hyps : |
|
mutable goal : |
|
mutable obligation : |
val dummy : t
val trivial : t
val make : Conditions.t -> Lang.F.pred -> t
val is_trivial : t -> bool
val apply : (Conditions.t -> Lang.F.pred -> Conditions.t * Lang.F.pred) ->
t -> unit
val preprocess : t -> unit
val dkey : Wp_parameters.category
val compute : t -> unit
val compute_proof : t -> Lang.F.pred
val compute_descr : t -> Conditions.t * Lang.F.pred
val get_descr : t -> Conditions.t * Lang.F.pred
val qed_time : t -> float