let failed_running = function `Failed_running _ -> true | _ -> false