timod_()

/*  created 2/2/87.  intended to provide timestamps; not yet working.  See
gettimeofday man entry */

{         struct timeval {
               long tv_sec;        /* seconds since Jan. 1, 1970 */
               long tv_usec;       /* and microseconds */
          };

          struct timezone {
               int  tz_minuteswest;     /* of Greenwich */
               int  tz_dsttime;    /* type of dst correction to apply */
          };
};
long int t;
struct timeval tp;
struct timezone tzp;
gettimeofday(&tp, &tzp);
t=tp.timeval_sec;
return(t);
}