let freebayes =   Git_installable_tool.make     Machine.Tool.Default.freebayes     ~repository:"https://github.com/ekg/freebayes.git"     ~recursive:true     ~install_program:(fun ~path -> KEDSL.Program.(         sh "make"         && shf "cp -r bin %s" path       ))     ~init_program:(fun ~path ->         KEDSL.Program.(shf "export PATH=%s/bin/:$PATH" path))     ~witness:(witness_list ["bin/freebayes""bin/bamleftalign"])