sig val suspend : t -> int -> int Lwt.t val suspend_hybrid : t -> int -> int Lwt.t val hibernate : t -> int Lwt.t val shutdown : t -> int Lwt.t val reboot : t -> int Lwt.t val set_power_save : t -> bool -> int Lwt.t end