Module Jasmin.Bigop

type __ = Obj.t
type ('r, 'i) bigbody =
  1. | BigBody of 'i * 'r -> 'r -> 'r * bool * 'r
val applybig : ('a1, 'a2) bigbody -> 'a1 -> 'a1
val reducebig : 'a1 -> 'a2 list -> ('a2 -> ('a1, 'a2) bigbody) -> 'a1
module type Coq_bigop_Locked = sig ... end
val index_enum_key : unit