package kappa-library

  1. Overview
  2. Docs
type translate_int =
  1. | BASIS_MINUS_INPUT of int
type conversion_info = {
  1. from_sig_name : string Kappa_data_structures.Loc.annoted;
  2. convert_value : translate_int;
  3. convert_delta : translate_int;
}
type origin =
  1. | From_original_ast
  2. | From_clte_elimination of conversion_info
val apply_int : translate_int -> int -> int
val apply_origin_to_value : origin -> int -> int
val apply_origin_to_delta : origin -> int -> int
val reorder_bounds : translate_int -> ('a * 'a) -> 'a * 'a
type counter_sig = {
  1. counter_sig_name : string Kappa_data_structures.Loc.annoted;
  2. counter_sig_min : int option Kappa_data_structures.Loc.annoted option;
  3. counter_sig_max : int option Kappa_data_structures.Loc.annoted option;
  4. counter_sig_visible : origin;
  5. counter_sig_default : int;
}
type t = counter_sig option array array
val print_counter : t -> int -> int -> Format.formatter -> unit
val print_kappa : noCounters:bool -> Signature.s -> Format.formatter -> t -> unit
val to_yojson : filenames:int Kappa_data_structures.Mods.StringMap.t -> t -> Yojson.Basic.t
val of_yojson : filenames:string array -> Yojson.Basic.t -> t
val get_conversion_info : ?except:exn -> counter_sig -> conversion_info
val get_counter_sig : ?except:exn -> Signature.s -> t -> int -> int -> counter_sig
OCaml

Innovation. Community. Security.