coq-serapi 8.17.0+0.17.3 · OCaml Package

type template_arity = Declarations.template_arity

val template_arity_of_sexp : Sexplib.Sexp.t -> template_arity

val sexp_of_template_arity : template_arity -> Sexplib.Sexp.t

type ('a, 'b) declaration_arity = ('a, 'b) Declarations.declaration_arity

val declaration_arity_of_sexp : 
  (Sexplib.Sexp.t -> 'a) ->
  (Sexplib.Sexp.t -> 'b) ->
  Sexplib.Sexp.t ->
  ('a, 'b) declaration_arity

val sexp_of_declaration_arity : 
  ('a -> Sexplib.Sexp.t) ->
  ('b -> Sexplib.Sexp.t) ->
  ('a, 'b) declaration_arity ->
  Sexplib.Sexp.t

type recarg = Declarations.recarg

val recarg_of_sexp : Sexplib.Sexp.t -> recarg

val sexp_of_recarg : recarg -> Sexplib.Sexp.t

type wf_paths = recarg Rtree.t

val wf_paths_of_sexp : Sexplib.Sexp.t -> wf_paths

val sexp_of_wf_paths : wf_paths -> Sexplib.Sexp.t

type regular_inductive_arity = Declarations.regular_inductive_arity

val regular_inductive_arity_of_sexp : Sexplib.Sexp.t -> regular_inductive_arity

val sexp_of_regular_inductive_arity : regular_inductive_arity -> Sexplib.Sexp.t

type inductive_arity = Declarations.inductive_arity

val inductive_arity_of_sexp : Sexplib.Sexp.t -> inductive_arity

val sexp_of_inductive_arity : inductive_arity -> Sexplib.Sexp.t

type one_inductive_body = Declarations.one_inductive_body

val one_inductive_body_of_sexp : Sexplib.Sexp.t -> one_inductive_body

val sexp_of_one_inductive_body : one_inductive_body -> Sexplib.Sexp.t

type typing_flags = Declarations.typing_flags

val typing_flags_of_sexp : Sexplib.Sexp.t -> typing_flags

val sexp_of_typing_flags : typing_flags -> Sexplib.Sexp.t

type inline = Declarations.inline

val sexp_of_inline : inline -> Sexplib.Sexp.t

val inline_of_sexp : Sexplib.Sexp.t -> inline

type constant_body = Declarations.constant_body

val sexp_of_constant_body : constant_body -> Sexplib0.Sexp.t

val constant_body_of_sexp : Sexplib0.Sexp.t -> constant_body

val constant_body_to_yojson : constant_body -> Yojson.Safe.t

val constant_body_of_yojson : 
  Yojson.Safe.t ->
  constant_body Ppx_deriving_yojson_runtime.error_or

val hash_fold_constant_body : 
  Base.Hash.state ->
  constant_body ->
  Base.Hash.state

val hash_constant_body : constant_body -> Base.Hash.hash_value

val compare_constant_body : constant_body -> constant_body -> int

type recursivity_kind = Declarations.recursivity_kind

val recursivity_kind_of_sexp : Sexplib.Sexp.t -> recursivity_kind

val sexp_of_recursivity_kind : recursivity_kind -> Sexplib.Sexp.t

val recursivity_kind_of_yojson : 
  Yojson.Safe.t ->
  (recursivity_kind, string) Result.result

val recursivity_kind_to_yojson : recursivity_kind -> Yojson.Safe.t

type mutual_inductive_body = Declarations.mutual_inductive_body

val sexp_of_mutual_inductive_body : mutual_inductive_body -> Sexplib0.Sexp.t

val mutual_inductive_body_of_sexp : Sexplib0.Sexp.t -> mutual_inductive_body

val mutual_inductive_body_to_yojson : mutual_inductive_body -> Yojson.Safe.t

val mutual_inductive_body_of_yojson : 
  Yojson.Safe.t ->
  mutual_inductive_body Ppx_deriving_yojson_runtime.error_or

val hash_fold_mutual_inductive_body : 
  Base.Hash.state ->
  mutual_inductive_body ->
  Base.Hash.state

val hash_mutual_inductive_body : mutual_inductive_body -> Base.Hash.hash_value

val compare_mutual_inductive_body : 
  mutual_inductive_body ->
  mutual_inductive_body ->
  int

type 'a module_alg_expr = 'a Declarations.module_alg_expr

val sexp_of_module_alg_expr : 
  ('a -> Sexplib.Sexp.t) ->
  'a module_alg_expr ->
  Sexplib.Sexp.t

val module_alg_expr_of_sexp : 
  (Sexplib.Sexp.t -> 'a) ->
  Sexplib.Sexp.t ->
  'a module_alg_expr

type structure_body = Declarations.structure_body

val sexp_of_structure_body : structure_body -> Sexplib0.Sexp.t

val structure_body_of_sexp : Sexplib0.Sexp.t -> structure_body

val structure_body_to_yojson : structure_body -> Yojson.Safe.t

val structure_body_of_yojson : 
  Yojson.Safe.t ->
  structure_body Ppx_deriving_yojson_runtime.error_or

val hash_fold_structure_body : 
  Base.Hash.state ->
  structure_body ->
  Base.Hash.state

val hash_structure_body : structure_body -> Base.Hash.hash_value

val compare_structure_body : structure_body -> structure_body -> int

type module_body = Declarations.module_body

val sexp_of_module_body : module_body -> Sexplib0.Sexp.t

val module_body_of_sexp : Sexplib0.Sexp.t -> module_body

val module_body_to_yojson : module_body -> Yojson.Safe.t

val module_body_of_yojson : 
  Yojson.Safe.t ->
  module_body Ppx_deriving_yojson_runtime.error_or

val hash_fold_module_body : Base.Hash.state -> module_body -> Base.Hash.state

val hash_module_body : module_body -> Base.Hash.hash_value

val compare_module_body : module_body -> module_body -> int

type module_type_body = Declarations.module_type_body

val sexp_of_module_type_body : module_type_body -> Sexplib0.Sexp.t

val module_type_body_of_sexp : Sexplib0.Sexp.t -> module_type_body

val module_type_body_to_yojson : module_type_body -> Yojson.Safe.t

val module_type_body_of_yojson : 
  Yojson.Safe.t ->
  module_type_body Ppx_deriving_yojson_runtime.error_or

val hash_fold_module_type_body : 
  Base.Hash.state ->
  module_type_body ->
  Base.Hash.state

val hash_module_type_body : module_type_body -> Base.Hash.hash_value

val compare_module_type_body : module_type_body -> module_type_body -> int

package coq-serapi