package coq-core
Install
    
    dune-project
 Dependency
Authors
Maintainers
Sources
sha512=9a35311acec2a806730b94ac7dceabc88837f235c52a14c026827d9b89433bd7fa9555a9fc6829aa49edfedb24c8bbaf1411ebf463b74a50aeb17cba47745b6b
    
    
  doc/coq-core.kernel/CClosure/index.html
Module CClosureSource
...
Delta implies all consts (both global (= by kernel_name) and local (= by Rel or Var)), all evars, and letin's. Rem: reduction of a Rel/Var bound to a term is Delta, but reduction of a LetIn expression is Letin reduction
fconstr is the type of frozen constr
fconstr can be accessed by using the function fterm_of and by matching on type fterm
type fterm = - | FRel of int
- | FAtom of Constr.constr(*- Metas and Sorts *)
- | FFlex of table_key
- | FInd of Constr.pinductive
- | FConstruct of Constr.pconstructor
- | FApp of fconstr * fconstr array
- | FProj of Names.Projection.t * fconstr
- | FFix of Constr.fixpoint * fconstr usubs
- | FCoFix of Constr.cofixpoint * fconstr usubs
- | FCaseT of Constr.case_info * Univ.Instance.t * Constr.constr array * Constr.case_return * fconstr * Constr.case_branch array * fconstr usubs
- | FCaseInvert of Constr.case_info * Univ.Instance.t * Constr.constr array * Constr.case_return * finvert * fconstr * Constr.case_branch array * fconstr usubs
- | FLambda of int * (Names.Name.t Context.binder_annot * Constr.constr) list * Constr.constr * fconstr usubs
- | FProd of Names.Name.t Context.binder_annot * fconstr * Constr.constr * fconstr usubs
- | FLetIn of Names.Name.t Context.binder_annot * fconstr * fconstr * Constr.constr * fconstr usubs
- | FEvar of Evar.t * Constr.constr list * fconstr usubs * evar_repack
- | FInt of Uint63.t
- | FFloat of Float64.t
- | FArray of Univ.Instance.t * fconstr Parray.t * fconstr
- | FLIFT of int * fconstr
- | FCLOS of Constr.constr * fconstr usubs
- | FIrrelevant
- | FLOCKED
type stack_member = - | Zapp of fconstr array
- | ZcaseT of Constr.case_info * Univ.Instance.t * Constr.constr array * Constr.case_return * Constr.case_branch array * fconstr usubs
- | Zproj of Names.Projection.Repr.t
- | Zfix of fconstr * stack
- | Zprimitive of CPrimitives.t * Constr.pconstant * fconstr list * fconstr next_native_args
- | Zshift of int
- | Zupdate of fconstr
val get_native_args1 : 
  CPrimitives.t ->
  Constr.pconstant ->
  stack ->
  fconstr list * fconstr * fconstr next_native_args * stackval inductive_subst : 
  Declarations.mutual_inductive_body ->
  Univ.Instance.t ->
  fconstr array ->
  fconstr usubsidentity if the first instance is empty
To lazy reduce a constr, create a clos_infos with create_clos_infos, inject the term to reduce with inject; then use a reduction function
mk_atom: prevents a term from being evaluated
val destFLambda : 
  (fconstr usubs -> Constr.constr -> fconstr) ->
  fconstr ->
  Names.Name.t Context.binder_annot * fconstr * fconstrGlobal and local constant cache
val create_conv_infos : 
  ?univs:UGraph.t ->
  ?evars:Constr.constr Constr.evar_handler ->
  RedFlags.reds ->
  Environ.env ->
  clos_infosval create_clos_infos : 
  ?univs:UGraph.t ->
  ?evars:Constr.constr Constr.evar_handler ->
  RedFlags.reds ->
  Environ.env ->
  clos_infosReduction function
norm_val is for strong normalization
Same as norm_val but for terms
whd_val is for weak head normalization
whd_stack performs weak head normalization in a given stack. It stops whenever a reduction is blocked.
val eta_expand_ind_stack : 
  Environ.env ->
  Names.inductive ->
  fconstr ->
  stack ->
  (fconstr * stack) ->
  stack * stacketa_expand_ind_stack env ind c s t computes stacks corresponding to the conversion of the eta expansion of t, considered as an inhabitant of ind, and the Constructor c of this inductive type applied to arguments s. Assumes t is a rigid term, and not a constructor. ind is the inductive of the constructor term c
Conversion auxiliary functions to do step by step normalisation
val unfold_reference : 
  Environ.env ->
  TransparentState.t ->
  clos_tab ->
  table_key ->
  (fconstr, Util.Empty.t) Declarations.constant_defunfold_reference unfolds references in a fconstr. Produces a FIrrelevant when the reference is irrelevant.
val unfold_ref_with_args : 
  clos_infos ->
  clos_tab ->
  table_key ->
  stack ->
  (fconstr * stack) optionLike unfold_reference, but handles primitives: if there are not enough arguments, return None. Otherwise return Some with ZPrimitive added to the stack. Produces a FIrrelevant when the reference is irrelevant and the infos was created with create_conv_infos.
Hook for Reduction
End of cbn debug section i