Markfunctionstype info = {inputs : Causal.S.t;outputs : Causal.S.t;o_table : Causal.S.t Causal.M.t;io_table : Causal.S.t Causal.M.t;}val funexp_info : Zelus.funexp -> infoval to_inline : info -> Defcaus.tc list -> Defcaus.tc -> boolval funexp_mark_to_inline : info -> Zelus.funexp -> Zelus.funexpval 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