package coq-serapi
Serialization library and protocol for machine interaction with the Coq proof assistant
Install
Dune Dependency
Authors
Maintainers
Sources
coq-serapi-8.13.0.0.13.0.tbz
sha256=ddef1d7278021ce391f62e8e222e10962c7a308d6a2dfd8320382b4cf9a8cd75
sha512=8ee9cc09e5b8708b6cd7b0af8fccaa900413aa106cb47d99ca1fdd5b39c52676fa906204766f8f9e0964cc7e3ef987009de79f26b534b2021cf66f20c3d62bfe
doc/src/coq-serapi.serlib/ser_impargs.ml.html
Source file ser_impargs.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
(************************************************************************) (* 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 MINES ParisTech *) (************************************************************************) (* Status: Very Experimental *) (************************************************************************) open Sexplib open Sexplib.Std module Names = Ser_names module Constrexpr = Ser_constrexpr type argument_position = [%import: Impargs.argument_position] [@@deriving sexp] type implicit_explanation = [%import: Impargs.implicit_explanation] [@@deriving sexp] type maximal_insertion = [%import: Impargs.maximal_insertion] [@@deriving sexp] type force_inference = [%import: Impargs.force_inference] [@@deriving sexp] (* XXX: Careful here, we break abstraction, so this must be kept in sync with Coq. *) type _implicit_side_condition = DefaultImpArgs | LessArgsThan of int [@@deriving sexp] type implicit_side_condition = Impargs.implicit_side_condition let implicit_side_condition_of_sexp (sexp : Sexp.t) : implicit_side_condition = Obj.magic (_implicit_side_condition_of_sexp sexp) let sexp_of_implicit_side_condition (isc : implicit_side_condition) : Sexp.t = sexp_of__implicit_side_condition (Obj.magic isc) type implicit_status = [%import: Impargs.implicit_status] [@@deriving sexp] type implicits_list = [%import: Impargs.implicits_list] [@@deriving sexp]
sectionYPositions = computeSectionYPositions($el), 10)"
x-init="setTimeout(() => sectionYPositions = computeSectionYPositions($el), 10)"
>