let default :
run_program: Machine.Make_fun.t ->
host: Common.KEDSL.Host.t ->
install_path: string ->
unit ->
_ = fun ~run_program ~host ~install_path () ->
Machine.Tool.Kit.of_list
(List.map ~f:(provide ~run_program ~host ~install_path) [
picard;
bowtie;
seq2hla;
optitype;
igvxml;
hlarp;
])