let isovar       ?(configuration = Tools.Isovar.Configuration.default) vcf bam =     fun ~(var_count : int) ->       let vcf_compiled = vcf ~var_count in       let bam_compiled = bam ~var_count in       function_call "isovar" [         "configuration", string Tools.Isovar.Configuration.(name configuration);         "vcf", vcf_compiled;         "bam", bam_compiled;       ]