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.1.tbz
sha256=f1070e6fa36ecf042319a14f621f26a331075f3777dfb85a0afbac6e3323e9d4
sha512=efbd947aa6750672f089b7b8604c798033793510eea1c45f4265df5f548b2ecdd3e69d5cb49b0714c09de1012fe358f618c9b1f4610a33339a151b4fdac42321
doc/src/coq-serapi.serlib/ser_tactypes.ml.html
Source file ser_tactypes.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
(************************************************************************) (* v * The Coq Proof Assistant / The Coq Development Team *) (* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2017 *) (* \VV/ **************************************************************) (* // * This file is distributed under the terms of the *) (* * GNU Lesser General Public License Version 2.1 *) (************************************************************************) (************************************************************************) (* Coq serialization API/Plugin *) (* Copyright 2016-2018 MINES ParisTech *) (************************************************************************) (* Status: Very Experimental *) (************************************************************************) open Sexplib.Conv open Ppx_compare_lib.Builtin open Ppx_hash_lib.Std.Hash.Builtin module CAst = Ser_cAst module Names = Ser_names module Namegen = Ser_namegen module EConstr = Ser_eConstr type 'a intro_pattern_action_expr = [%import: 'a Tactypes.intro_pattern_action_expr] and 'a intro_pattern_expr = [%import: 'a Tactypes.intro_pattern_expr] and 'a or_and_intro_pattern_expr = [%import: 'a Tactypes.or_and_intro_pattern_expr] [@@deriving sexp,yojson,hash,compare] type quantified_hypothesis = [%import: Tactypes.quantified_hypothesis] [@@deriving sexp,yojson,hash,compare] type 'a explicit_bindings = [%import: 'a Tactypes.explicit_bindings] [@@deriving sexp,yojson,hash,compare] type 'a bindings = [%import: 'a Tactypes.bindings] [@@deriving sexp,yojson,hash,compare] type 'a with_bindings = [%import: 'a Tactypes.with_bindings] [@@deriving sexp,yojson,hash,compare] module DO = struct type 'a t = 'a Tactypes.delayed_open let name = "Tactypes.delayed.open" end module B = SerType.Opaque1(DO) type 'a delayed_open = 'a B.t let sexp_of_delayed_open = B.sexp_of_t let delayed_open_of_sexp = B.t_of_sexp let delayed_open_of_yojson = B.of_yojson let delayed_open_to_yojson = B.to_yojson (* let hash_delayed_open = B.hash *) let hash_fold_delayed_open = B.hash_fold_t let compare_delayed_open = B.compare type delayed_open_constr = [%import: Tactypes.delayed_open_constr] [@@deriving sexp,yojson,hash,compare] type delayed_open_constr_with_bindings = [%import: Tactypes.delayed_open_constr_with_bindings] [@@deriving sexp,yojson,hash,compare]
sectionYPositions = computeSectionYPositions($el), 10)"
x-init="setTimeout(() => sectionYPositions = computeSectionYPositions($el), 10)"
>