Probaval new_prob : unit -> Zident.tval typ_prob : Deftypes.typ_desc Deftypes.locval prob_varpat : Zident.t -> Zelus.patternval extra_input :
Zident.Env.key ->
Deftypes.tentry Zident.Env.t ->
Deftypes.tentry Zident.Env.t * Zelus.patternval block : Zident.t -> Zelus.eq list Zelus.block -> Zelus.eq list Zelus.blockTranslate a block
val local : Zident.t -> Zelus.local -> Zelus.localval implementation :
Zelus.implementation_desc Zelus.localized ->
Zelus.implementation_desc Zelus.localizedval implementation_list :
Zelus.implementation_desc Zelus.localized list ->
Zelus.implementation_desc Zelus.localized list