let strelka ~configuration bam_pair =     somatic_variant_caller       {Variant_caller.name = "Strelka";        configuration_json = Strelka.Configuration.to_json configuration;        configuration_name = configuration.Strelka.Configuration.name;        make_target =          fun ~run_with ~input ~result_prefix ?more_edges () ->             match input with | Variant_caller.Somatic {normal; tumor} ->             Strelka.run               ?more_edges               ~configuration ~normal ~tumor               ~run_with ~result_prefix               ()       }       bam_pair