clock←()
{struct tbuffer {
long int proc←user←time;
long int proc←system←time;
long int child←user←time;
long int child←system←time;
};
long int t;
float x;
struct tbuffer buffer;
times(&buffer);
t=buffer.proc←user←time;
x = 16.6667 * (float) t ;
t = (long int) x ;
return(t);
}