Varsval names : Ident.S.t -> 'a Ident.Env.t -> Ident.S.tval fv_pat : Ident.S.t -> Ident.S.t -> Zelus.pattern -> Ident.S.tval fv_block :
((Ident.S.t * 'a) -> Zelus.local -> Ident.S.t * 'a) ->
(Ident.S.t -> 'a -> 'b -> 'c) ->
Ident.S.t ->
'a ->
'b Zelus.block ->
Ident.S.t * 'cval fv_match_handler :
(Ident.S.t -> 'a -> 'b -> 'a) ->
'b Zelus.match_handler list ->
Ident.S.t ->
'a ->
'aval size : Ident.S.t -> Zelus.size -> Ident.S.t