package coq-serapi
Serialization library and protocol for machine interaction with the Coq proof assistant
Install
Dune Dependency
Authors
Maintainers
Sources
coq-serapi-8.18.0.0.18.3.tbz
sha256=d9a32c0033d720032011e9bf5e8d30d4b205ce276b6a81ab359fc461809e9b63
sha512=742d2b92b986e45044c19cd2bbfd5dd5346cfb4b0ec20f40811d8b0096c6e25192528359f98d2eed2a74ae67790d1f8cea382cb01fd7cf8903a5a917cca79a84
doc/src/coq-serapi.serlib/ser_context.ml.html
Source file ser_context.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
(************************************************************************) (* v * The Coq Proof Assistant / The Coq Development Team *) (* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2016 *) (* \VV/ **************************************************************) (* // * This file is distributed under the terms of the *) (* * GNU Lesser General Public License Version 2.1 *) (************************************************************************) (************************************************************************) (* Coq serialization API/Plugin *) (* Copyright 2016-2017 MINES ParisTech *) (* Written by: Emilio J. Gallego Arias *) (************************************************************************) (* Status: Very Experimental *) (************************************************************************) open Sexplib.Std open Ppx_hash_lib.Std.Hash.Builtin open Ppx_compare_lib.Builtin module Names = Ser_names module Sorts = Ser_sorts type 'a binder_annot = [%import: 'a Context.binder_annot] [@@deriving sexp,yojson,hash,compare] module Rel = struct module Declaration = struct type ('constr, 'types) pt = [%import: ('constr, 'types) Context.Rel.Declaration.pt] [@@deriving sexp,yojson,hash,compare] end type ('constr, 'types) pt = [%import: ('constr, 'types) Context.Rel.pt] [@@deriving sexp,yojson,hash,compare] end module Named = struct module Declaration = struct type ('constr, 'types) pt = [%import: ('constr, 'types) Context.Named.Declaration.pt] [@@deriving sexp,yojson,hash,compare] end type ('constr, 'types) pt = [%import: ('constr, 'types) Context.Named.pt] [@@deriving sexp,yojson,hash,compare] end module Compacted = struct module Declaration = struct type ('constr, 'types) pt = [%import: ('constr, 'types) Context.Compacted.Declaration.pt] [@@deriving sexp] end type ('constr, 'types) pt = [%import: ('constr, 'types) Context.Compacted.pt] [@@deriving sexp] end
sectionYPositions = computeSectionYPositions($el), 10)"
x-init="setTimeout(() => sectionYPositions = computeSectionYPositions($el), 10)"
>