package why3
type proof_attempt_status =
| Undone
| Scheduled
| Running
| Done of Call_provers.prover_result
| Interrupted
| Detached
| InternalFailure of exn
| Uninstalled of Whyconf.prover
| UpgradeProver of Whyconf.prover
| Removed of Whyconf.prover
val print_status : Format.formatter -> proof_attempt_status -> unit
type transformation_status =
| TSscheduled
| TSdone of Session_itp.transID
| TSfailed of Session_itp.proofNodeID * exn
| TSfatal of Session_itp.proofNodeID * exn
val print_trans_status : Format.formatter -> transformation_status -> unit
type strategy_status =
| STSgoto of Session_itp.proofNodeID * int
| STShalt
| STSfatal of string * Session_itp.proofNodeID * exn
val print_strategy_status : Format.formatter -> strategy_status -> unit
module type Scheduler = sig ... end
type controller = private {
mutable controller_session : Session_itp.session;
mutable controller_config : Whyconf.config;
mutable controller_env : Env.env;
controller_provers : (Whyconf.config_prover * Driver.driver) Whyconf.Hprover.t;
controller_strategies : (string * string * string * Strategy.instruction array) Wstdlib.Hstr.t;
controller_running_proof_attempts : unit Session_itp.Hpan.t;
}
val create_controller :
Whyconf.config ->
Env.env ->
Session_itp.session ->
controller
val set_session_memlimit : controller -> int -> unit
val set_session_timelimit : controller -> int -> unit
val set_session_prover_upgrade_policy :
controller ->
Whyconf.prover ->
Whyconf.prover_upgrade_policy ->
unit
val print_session : Format.formatter -> controller -> unit
val reload_files :
?hard_reload:bool ->
controller ->
shape_version:int option ->
bool * bool
val add_file : controller -> ?format:Env.fformat -> string -> unit
val remove_subtree :
notification:Session_itp.notifier ->
removed:Session_itp.notifier ->
controller ->
Session_itp.any ->
unit
val get_undetached_children_no_pa :
Session_itp.session ->
Session_itp.any ->
Session_itp.any list
val set_partial_config : controller -> Whyconf.config -> unit
sectionYPositions = computeSectionYPositions($el), 10)"
x-init="setTimeout(() => sectionYPositions = computeSectionYPositions($el), 10)"
>