#include <time.h>

/* f2c extension that returns the time as a UNIX timestamp. */
long xtime_()
{
    return time(0);
}