Module Sdlpower

module Sdlpower: sig .. end

type power_state = [ `powerstate_Charged
       | `powerstate_Charging
       | `powerstate_No_Battery
       | `powerstate_On_Battery
       | `powerstate_Unknown ] 

val get_power_info : unit -> power_state * int * int