https://github.com/EasyCrypt/easycrypt
Tip revision: a2dcec97cf776a2dc0c66353b7963b8a02beeab0 authored by Benjamin Gregoire on 17 October 2022, 07:44:02 UTC
add missing restriction in the case of adversary
add missing restriction in the case of adversary
Tip revision: a2dcec9
ecSmt.mli
(* -------------------------------------------------------------------- *)
open EcPath
open EcFol
open EcEnv
open EcProvers
(* -------------------------------------------------------------------- *)
val check : ?notify:notify -> prover_infos -> LDecl.hyps -> form -> bool
val dump_why3 : env -> string -> unit
module Frequency : sig
(* -------------------------------------------------------------------- *)
type relevant = Sp.t * Sx.t
val r_empty : relevant
val r_inter : relevant -> relevant -> relevant
val r_diff : relevant -> relevant -> relevant
val r_card : relevant -> int
type all_rel = [ `OP of path | `PROC of xpath]
val r_fold : (all_rel -> 'a -> 'a) -> relevant -> 'a -> 'a
type frequency
val create : Sp.t -> frequency
val frequency : frequency -> all_rel -> int
val f_ops : Sp.t -> form -> relevant
val add : frequency -> EcFol.form -> unit
end