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);
}