package coq
type evars = {
evars_val : Constr.existential -> Constr.constr option;
evars_typ : Constr.existential -> Constr.types;
evars_metas : Constr.metavariable -> Constr.types;
}
val empty_evars : evars
val decompose_Llam :
Nativeinstr.lambda ->
Names.Name.t array * Nativeinstr.lambda
val decompose_Llam_Llet :
Nativeinstr.lambda ->
(Names.Name.t * Nativeinstr.lambda option) array * Nativeinstr.lambda
val is_lazy : Nativeinstr.prefix -> Constr.constr -> bool
val mk_lazy : Nativeinstr.lambda -> Nativeinstr.lambda
val get_mind_prefix : Pre_env.env -> Names.MutInd.t -> string
val get_alias : Pre_env.env -> Constr.pconstant -> Constr.pconstant
val lambda_of_constr :
Pre_env.env ->
evars ->
Constr.constr ->
Nativeinstr.lambda
val compile_static_int31 : bool -> Constr.constr array -> Nativeinstr.lambda
val compile_dynamic_int31 :
bool ->
Nativeinstr.prefix ->
Names.constructor ->
Nativeinstr.lambda array ->
Nativeinstr.lambda
val before_match_int31 :
Names.inductive ->
bool ->
Nativeinstr.prefix ->
Names.constructor ->
Nativeinstr.lambda ->
Nativeinstr.lambda
val compile_prim :
CPrimitives.t ->
Names.Constant.t ->
bool ->
Nativeinstr.prefix ->
Nativeinstr.lambda array ->
Nativeinstr.lambda
sectionYPositions = computeSectionYPositions($el), 10)"
x-init="setTimeout(() => sectionYPositions = computeSectionYPositions($el), 10)"
>