ComFixpoint (u.4b72d9d53197f808b005effa2cda4f29.coq-core.8.20.1.doc.coq-core.vernac.ComFixpoint)

Fixpoints and cofixpoints

Entry points for the vernacular commands Fixpoint and CoFixpoint

val do_fixpoint : 
  ?scope:Locality.definition_scope ->
  ?clearbody:bool ->
  poly:bool ->
  ?typing_flags:Declarations.typing_flags ->
  ?user_warns:UserWarn.t ->
  ?using:Vernacexpr.section_subset_expr ->
  Vernacexpr.fixpoint_expr list ->
  Declare.Proof.t option

Source

val do_cofixpoint : 
  ?scope:Locality.definition_scope ->
  ?clearbody:bool ->
  poly:bool ->
  ?typing_flags:Declarations.typing_flags ->
  ?user_warns:UserWarn.t ->
  ?using:Vernacexpr.section_subset_expr ->
  Vernacexpr.cofixpoint_expr list ->
  Declare.Proof.t option

Internal API

Typing global fixpoints and cofixpoint_expr

Source

val adjust_rec_order : 
  structonly:bool ->
  Constrexpr.local_binder_expr list ->
  Constrexpr.recursion_order_expr option ->
  Names.lident option

Source

type ('constr, 'types, 'r) recursive_preentry =
  Names.Id.t list * 'r list * 'constr option list * 'types list

names / relevance / defs / types

Source

val interp_recursive_evars : 
  Environ.env ->
  program_mode:bool ->
  cofix:bool ->
  Names.lident option Vernacexpr.fix_expr_gen list ->
  (Environ.env * EConstr.named_context * UState.universe_decl * Evd.evar_map)
  * (EConstr.t, EConstr.types, EConstr.ERelevance.t) recursive_preentry
  * (EConstr.rel_context * Impargs.manual_implicits * int option) list

Exported for Program

Exported for Funind

Source

val interp_recursive : 
  ?check_recursivity:bool ->
  ?typing_flags:Declarations.typing_flags ->
  cofix:bool ->
  Names.lident option Vernacexpr.fix_expr_gen list ->
  (Constr.t, Constr.types, Sorts.relevance) recursive_preentry
  * UState.universe_decl
  * UState.t
  * (EConstr.rel_context * Impargs.manual_implicits * int option) list

Source

val compute_possible_guardness_evidences : 
  (('a, 'b, 'r) Context.Rel.pt * 'c * int option) ->
  int list

Very private function, do not use