package libsail

  1. Overview
  2. Docs
Legend:
Library
Module
Module type
Parameter
Class
Class type
val zencode_id : Ast.id -> string
val zencode_upper_id : Ast.id -> string
val zencode_name : Jib.name -> string
type smt_typ =
  1. | Bitvec of int
  2. | Bool
  3. | String
  4. | Real
  5. | Datatype of string * (string * (string * smt_typ) list) list
  6. | Array of smt_typ * smt_typ
val mk_enum : string -> string list -> smt_typ
val mk_record : string -> (string * smt_typ) list -> smt_typ
val mk_variant : string -> (string * smt_typ) list -> smt_typ
type smt_array_info =
  1. | Fixed of int
type smt_exp =
  1. | Bool_lit of bool
  2. | Bitvec_lit of Sail2_values.bitU list
  3. | Real_lit of string
  4. | String_lit of string
  5. | Var of Jib.name
  6. | Unit
  7. | Member of Ast.id
  8. | Fn of string * smt_exp list
  9. | Ite of smt_exp * smt_exp * smt_exp
  10. | SignExtend of int * int * smt_exp
  11. | ZeroExtend of int * int * smt_exp
  12. | Extract of int * int * smt_exp
  13. | Tester of string * smt_exp
  14. | Unwrap of Ast.id * bool * smt_exp
  15. | Field of Ast.id * Ast.id * smt_exp
  16. | Store of smt_array_info * string * smt_exp * smt_exp * smt_exp
  17. | Empty_list
  18. | Hd of string * smt_exp
  19. | Tl of string * smt_exp
val var_id : Ast.id -> smt_exp
val fold_smt_exp : (smt_exp -> smt_exp) -> smt_exp -> smt_exp
val extract : int -> int -> smt_exp -> smt_exp
val bvnot : smt_exp -> smt_exp
val bvand : smt_exp -> smt_exp -> smt_exp
val bvor : smt_exp -> smt_exp -> smt_exp
val bvneg : smt_exp -> smt_exp
val bvadd : smt_exp -> smt_exp -> smt_exp
val bvsub : smt_exp -> smt_exp -> smt_exp
val bvmul : smt_exp -> smt_exp -> smt_exp
val bvudiv : smt_exp -> smt_exp -> smt_exp
val bvurem : smt_exp -> smt_exp -> smt_exp
val bvshl : smt_exp -> smt_exp -> smt_exp
val bvlshr : smt_exp -> smt_exp -> smt_exp
val bvult : smt_exp -> smt_exp -> smt_exp
val bvzero : int -> smt_exp
val bvones : int -> smt_exp
val bvone : int -> smt_exp
val smt_conj : smt_exp list -> smt_exp
val smt_disj : smt_exp list -> smt_exp
val simp_and : smt_exp list -> smt_exp
val simp_or : smt_exp list -> smt_exp
val simp_eq : smt_exp -> smt_exp -> bool option
val simp_fn : string -> smt_exp list -> smt_exp
val simp : (Jib.name -> smt_exp option) -> smt_exp -> smt_exp
type smt_def =
  1. | Define_fun of string * (string * smt_typ) list * smt_typ * smt_exp
  2. | Declare_fun of string * smt_typ list * smt_typ
  3. | Declare_const of Jib.name * smt_typ
  4. | Define_const of Jib.name * smt_typ * smt_exp
  5. | Declare_datatypes of string * (string * (string * smt_typ) list) list
  6. | Assert of smt_exp
val declare_datatypes : smt_typ -> smt_def
val pp_sfun : string -> PPrint.document list -> PPrint.document
val pp_smt_typ : smt_typ -> PPrint.document
val pp_str_smt_typ : (string * smt_typ) -> PPrint.document
val pp_smt_exp : smt_exp -> PPrint.document
val pp_smt_def : smt_def -> PPrint.document
val string_of_smt_def : smt_def -> string
type counterexample_solver =
  1. | Cvc5
  2. | Cvc4
  3. | Z3
val counterexample_command : counterexample_solver -> string
val counterexample_solver_from_name : string -> counterexample_solver option
module type COUNTEREXAMPLE_CONFIG = sig ... end
OCaml

Innovation. Community. Security.