Module Entries
This module defines the entry types for global declarations. This information is entered in the environments. This includes global constants/axioms, mutual inductive definitions, modules and module types
type universes_entry
=
|
Monomorphic_entry of Univ.ContextSet.t
|
Polymorphic_entry of Names.Name.t array * Univ.UContext.t
type 'a in_universes_entry
= 'a * universes_entry
Declaration of inductive types.
type one_inductive_entry
=
{
mind_entry_typename : Names.Id.t;
mind_entry_arity : Constr.constr;
mind_entry_template : bool;
mind_entry_consnames : Names.Id.t list;
mind_entry_lc : Constr.constr list;
}
type mutual_inductive_entry
=
{
mind_entry_record : Names.Id.t array option option;
Some (Some ids): primitive records with ids the binder name of each record in their respective projections. Not used by the kernel. Some None: non-primitive record
mind_entry_finite : Declarations.recursivity_kind;
mind_entry_params : Constr.rel_context;
mind_entry_inds : one_inductive_entry list;
mind_entry_universes : universes_entry;
mind_entry_variance : Univ.Variance.t array option;
mind_entry_private : bool option;
}
type 'a proof_output
= Constr.constr Univ.in_universe_context_set * 'a
Constants (Definition/Axiom)
type 'a const_entry_body
= 'a proof_output Future.computation
type 'a definition_entry
=
{
const_entry_body : 'a const_entry_body;
const_entry_secctx : Constr.named_context option;
const_entry_feedback : Stateid.t option;
const_entry_type : Constr.types option;
const_entry_universes : universes_entry;
const_entry_opaque : bool;
const_entry_inline_code : bool;
}
type section_def_entry
=
{
secdef_body : Constr.constr;
secdef_secctx : Constr.named_context option;
secdef_feedback : Stateid.t option;
secdef_type : Constr.types option;
}
type inline
= int option
type parameter_entry
= Constr.named_context option * Constr.types in_universes_entry * inline
type primitive_entry
=
{
prim_entry_type : Constr.types option;
prim_entry_univs : Univ.ContextSet.t;
prim_entry_content : CPrimitives.op_or_type;
}
type 'a constant_entry
=
|
DefinitionEntry of 'a definition_entry
|
ParameterEntry of parameter_entry
|
PrimitiveEntry of primitive_entry
Modules
type module_struct_entry
= Declarations.module_alg_expr
type module_params_entry
= (Names.MBId.t * module_struct_entry) list
older first
type module_type_entry
= module_params_entry * module_struct_entry
type module_entry
=
|
MType of module_params_entry * module_struct_entry
|
MExpr of module_params_entry * module_struct_entry * module_struct_entry option
type seff_env
=[
|
`Nothing
|
`Opaque of Constr.t * Univ.ContextSet.t
]
type side_effect_role
=
|
Subproof
|
Schema of Names.inductive * string
Not used by the kernel.
type side_eff
=
{
seff_constant : Names.Constant.t;
seff_body : Declarations.constant_body;
seff_env : seff_env;
seff_role : side_effect_role;
}