https://github.com/EasyCrypt/easycrypt
Tip revision: fc07a369c06d62559c2e8cf00fd6ec6f2e8f4a3a authored by Pierre-Yves Strub on 29 March 2022, 08:01:08 UTC
License change: CeCILL B/C -> MIT
License change: CeCILL B/C -> MIT
Tip revision: fc07a36
ecSymbols.mli
(* -------------------------------------------------------------------- *)
open EcMaps
(* -------------------------------------------------------------------- *)
type symbol = string
type qsymbol = symbol list * symbol
type msymbol = (symbol * msymbol list) list
(* -------------------------------------------------------------------- *)
val sym_equal : symbol -> symbol -> bool
val sym_compare : symbol -> symbol -> int
(* -------------------------------------------------------------------- *)
module Msym : Map.S with type key = symbol
module Ssym : Set.S with module M = Map.MakeBase(Msym)
module MMsym : sig
type +'a t
val empty : 'a t
val add : symbol -> 'a -> 'a t -> 'a t
val last : symbol -> 'a t -> 'a option
val all : symbol -> 'a t -> 'a list
val fold : (symbol -> 'a list -> 'b -> 'b) -> 'a t -> 'b -> 'b
val map_at : ('a list -> 'a list) -> symbol -> 'a t -> 'a t
val iter : (symbol -> 'a -> unit) -> 'a t -> unit
end
(* -------------------------------------------------------------------- *)
val pp_symbol : Format.formatter -> symbol -> unit
val pp_qsymbol : Format.formatter -> qsymbol -> unit
val pp_msymbol : Format.formatter -> msymbol -> unit
val string_of_qsymbol : qsymbol -> string