int G77_itime_0 (integer tarray[3]) #endif
G77_itime_0 (integer tarray[3])
/* Subroutine */ int G77_itime_0 (integer tarray[3])#endif{  struct tm *lt;  time_t tim;  tim = time(NULL);  lt = localtime(&tim);  tarray[0] = lt->tm_hour;  tarray[1] = lt->tm_min;  tarray[2] = lt->tm_sec;  return 0;}