Horizonval gather_horizons :
Deftypes.tentry Ident.Env.t ->
Ident.Env.key list * Deftypes.tentry Ident.Env.tval equation_list_with_horizon :
Ident.t option ->
Deftypes.tentry Ident.Env.t ->
Zelus.eq list ->
Deftypes.tentry Ident.Env.t * Zelus.eq list * Ident.t optionval block :
Ident.t option ->
Zelus.eq list Zelus.block ->
Zelus.eq list Zelus.block * Ident.t optionTranslate a block
val 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