Indrec (p.rocq-runtime.9.0.0.doc.rocq-runtime.pretyping.Indrec)

Sourcetype recursion_scheme_error =

| NotAllowedCaseAnalysis of bool * Sorts.t * Constr.pinductive
| NotMutualInScheme of Names.inductive * Names.inductive
| NotAllowedDependentAnalysis of bool * Names.inductive

Sourceexception RecursionSchemeError of Environ.env * recursion_scheme_error

Eliminations

Sourcetype dep_flag = bool

Build a case analysis elimination scheme in some sort

Sourcetype case_analysis = private {

case_params : EConstr.rel_context;
case_pred : Names.Name.t EConstr.binder_annot * EConstr.types;
case_branches : EConstr.rel_context;
case_arity : EConstr.rel_context;
case_body : EConstr.t;
case_type : EConstr.t;

}

Source

val check_valid_elimination : 
  Environ.env ->
  Evd.evar_map ->
  Names.inductive EConstr.puniverses ->
  dep:bool ->
  EConstr.ESorts.t ->
  Evd.evar_map

Sourceval eval_case_analysis : case_analysis -> EConstr.t * EConstr.types

Sourceval default_case_analysis_dependence : Environ.env -> Names.inductive -> bool

Source

val build_case_analysis_scheme : 
  Environ.env ->
  Evd.evar_map ->
  Names.inductive EConstr.puniverses ->
  dep_flag ->
  EConstr.ESorts.t ->
  Evd.evar_map * case_analysis

Build a dependent case elimination predicate unless type is in Prop or is a recursive record with primitive projections.

Source

val build_case_analysis_scheme_default : 
  Environ.env ->
  Evd.evar_map ->
  Names.inductive EConstr.puniverses ->
  EConstr.ESorts.t ->
  Evd.evar_map * case_analysis

Builds a recursive induction scheme (Peano-induction style) in the given sort.

Source

val build_induction_scheme : 
  Environ.env ->
  Evd.evar_map ->
  Names.inductive EConstr.puniverses ->
  dep_flag ->
  EConstr.ESorts.t ->
  Evd.evar_map * EConstr.constr

Builds mutual (recursive) induction schemes

Source

val build_mutual_induction_scheme : 
  Environ.env ->
  Evd.evar_map ->
  ?force_mutual:bool ->
  (Names.inductive EConstr.puniverses * dep_flag * EConstr.ESorts.t) list ->
  Evd.evar_map * EConstr.constr list

Recursor names utilities

Source

val lookup_eliminator : 
  Environ.env ->
  Names.inductive ->
  Sorts.family ->
  Names.GlobRef.t

Sourceval elimination_suffix : Sorts.family -> string

Sourceval make_elimination_ident : Names.Id.t -> Sorts.family -> Names.Id.t

Sourceval case_suffix : string

Default dependence of eliminations for Prop inductives

Sourceval declare_prop_but_default_dependent_elim : Names.inductive -> unit

Sourceval is_prop_but_default_dependent_elim : Names.inductive -> bool

Source

val pseudo_sort_family_for_elim : 
  Names.inductive ->
  Declarations.one_inductive_body ->
  Sorts.family