class type clock =object
..end
method id : string
method attach : active_source -> unit
method detach : (active_source -> bool) -> unit
method attach_clock : clock_variable -> unit
method sub_clocks : clock_variable list
method start_outputs : (active_source -> bool) -> unit -> active_source list
method get_tick : int
method end_tick : unit