/* -*- Mode: Text -*- */

/********************************************************************\
* File: clock.hs                                                     *
* Date: 06/15/1997                                                   *
* Author: Cem Unsal                                                  *
*         Robotics Institute, Carnegie-Mellon University             *
*         unsal@ri.cmu.edu                                           *
*                                                                    *
* Description:                                                       *
* Global clock/timer                                                 *
*                                                                    *
* Usage:    t(time)                                                  *
*                                                                    *
* External C functions: -                                            *
*                                                                    *
* This file is distributed under the conditions described in the     *
* file 'CONDITIONS' which should accompany this file.                *
\********************************************************************/

#ifndef SAHS_CLOCK_HS
#define SAHS_CLOCK_HS

type Clock 
{
  output continuous number t;

  discrete running;

  flow default {t' = 1;};
} 

global Clock time := create(Clock);

#endif // SAHS_CLOCK_HS