Module `Primred`

val add_retroknowledge : Environ.env -> Retroknowledge.action -> Environ.env: Reduction of primitives

val get_int_type : Environ.env -> Names.Constant.t
val get_bool_constructors : Environ.env -> Names.constructor * Names.constructor
val get_carry_constructors : Environ.env -> Names.constructor * Names.constructor
val get_pair_constructor : Environ.env -> Names.constructor
val get_cmp_constructors : Environ.env -> Names.constructor * Names.constructor * Names.constructor

exception NativeDestKO

module type RedNativeEntries = sig ... end

module type RedNative = sig ... end

module RedNative : functor (E : RedNativeEntries) -> RedNative with type elem = E.elem with type args = E.args with type evd = E.evd