let create_netmhc_runner_cmd     ~binary_name ~binary_path ~conda_env dest =   let script_contents =      netmhc_runner_script_contents ~binary_name ~binary_path ~conda_env   in   let cmd =      sprintf       "cat << EOF > %s%sEOF"       dest       (escape_char ~needle:'$' script_contents)   in   KEDSL.Program.(sh cmd)