Module Biokepi_pipeline_edsl.To_json (.ml)

module To_json: sig .. end

module Tools: Biokepi_bfx_tools

module Hla_utils: Biokepi_run_environment.Hla_utilities

type json = Yojson.Basic.json 

type 'a repr = var_count:int -> json 

type 'a observation = json 

val lambda : ((var_count:'a -> [> `String of string ]) ->
        var_count:int -> ([> `String of string ] as 'b)) ->
       var_count:int -> [> `Assoc of (string * 'b) list ]

val apply : (var_count:'a -> 'b) ->
       (var_count:'a -> 'b) -> var_count:'a -> [> `Assoc of (string * 'b) list ]

val observe : (unit -> var_count:int -> 'a) -> 'a

val to_unit : 'a -> 'a

val list : (var_count:'a -> 'b) list -> var_count:'a -> [> `List of 'b list ]

val list_map : (var_count:'a -> 'b) ->
       f:(var_count:'a -> 'b) -> var_count:'a -> [> `Assoc of (string * 'b) list ]

module Make_serializer: 
functor (How : sig

type t 


val input_value : string ->
       (string * string) list -> var_count:int -> t
val function_call : string ->
       (string * t) list ->
       t
val string : string -> t
end) -> sig .. end

include struct ... end