let guess_env_setup     ~install_path     ?(tmp_dirname = "tmp")     ?(home_env = "NMHOME")     tool_file_loc =   let folder_name = guess_folder_name tool_file_loc in   [     `ENV (home_env, install_path // folder_name);     `ENV ("TMPDIR", install_path // tmp_dirname);   ]