package coq-serapi
Serialization library and protocol for machine interaction with the Coq proof assistant
Install
Dune Dependency
Authors
Maintainers
Sources
coq-serapi-8.16.0.0.16.3.tbz
sha256=66137df53e01398a26e9e51056af7439997bcf562fbe4503946fe89e0c5df443
sha512=5c71f7acd4537c33853122d9c526e61f35d2934504c77ce95196f8d595f1c619a680fccd46ba9deb69b509eeb936984056380b18b65fae617ae1cce704df90a1
doc/src/serlib_number_string_notation_plugin/ser_g_number_syntax.ml.html
Source file ser_g_number_syntax.ml
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85
open Serlib open Sexplib.Conv open Ppx_compare_lib.Builtin open Ppx_hash_lib.Std.Hash.Builtin module Libnames = Ser_libnames module Notation = Ser_notation module A1 = struct type raw = Notation.numnot_option [@@deriving sexp,hash,compare] type glb = unit [@@deriving sexp,hash,compare] type top = unit [@@deriving sexp,hash,compare] end let ser_wit_deprecated_number_modifier = let module M = Ser_genarg.GS(A1) in M.genser module A2 = struct type raw = Ser_number.number_option [@@deriving sexp,hash,compare] type glb = unit [@@deriving sexp,hash,compare] type top = unit [@@deriving sexp,hash,compare] end let ser_wit_number_modifier = let module M = Ser_genarg.GS(A2) in M.genser module A3 = struct type raw = Ser_number.number_option list [@@deriving sexp,hash,compare] type glb = unit [@@deriving sexp,hash,compare] type top = unit [@@deriving sexp,hash,compare] end let ser_wit_number_options = let module M = Ser_genarg.GS(A3) in M.genser module A4 = struct type raw = bool * Libnames.qualid * Libnames.qualid [@@deriving sexp,hash,compare] type glb = unit [@@deriving sexp,hash,compare] type top = unit [@@deriving sexp,hash,compare] end let ser_wit_number_string_mapping = let module M = Ser_genarg.GS(A4) in M.genser module A5 = struct type raw = Libnames.qualid * (bool * Libnames.qualid * Libnames.qualid) list [@@deriving sexp,hash,compare] type glb = unit [@@deriving sexp,hash,compare] type top = unit [@@deriving sexp,hash,compare] end let ser_wit_number_string_via = let module M = Ser_genarg.GS(A5) in M.genser module A6 = struct type raw = Libnames.qualid * (bool * Libnames.qualid * Libnames.qualid) list [@@deriving sexp,hash,compare] type glb = unit [@@deriving sexp,hash,compare] type top = unit [@@deriving sexp,hash,compare] end let ser_wit_string_option = let module M = Ser_genarg.GS(A6) in M.genser let register () = Ser_genarg.register_genser Number_string_notation_plugin.G_number_string.wit_deprecated_number_modifier ser_wit_deprecated_number_modifier; Ser_genarg.register_genser Number_string_notation_plugin.G_number_string.wit_number_modifier ser_wit_number_modifier; Ser_genarg.register_genser Number_string_notation_plugin.G_number_string.wit_number_options ser_wit_number_options; Ser_genarg.register_genser Number_string_notation_plugin.G_number_string.wit_number_string_mapping ser_wit_number_string_mapping; Ser_genarg.register_genser Number_string_notation_plugin.G_number_string.wit_number_string_via ser_wit_number_string_via; Ser_genarg.register_genser Number_string_notation_plugin.G_number_string.wit_string_option ser_wit_string_option; () let _ = register ()
sectionYPositions = computeSectionYPositions($el), 10)"
x-init="setTimeout(() => sectionYPositions = computeSectionYPositions($el), 10)"
>