BOSS 7.0.7
BESIII Offline Software System
Loading...
Searching...
No Matches
EeToeeV/EeToeeV-00-00-01/src/EeToeeV/basesv5.1/uxdate_.c
Go to the documentation of this file.
1#include <time.h>
2/* long iutime() */
3/*main()*/
4void uxdate_(year,mon,day,hour,min)
5int *year, *mon, *day, *hour, *min;
6{
7 struct tm q;
8 struct tm *localtime();
9 time_t tp;
10 time_t mktime();
11 time_t time();
12 char *ctime();
13 char *date;
14
15
16 time(&tp);
17 date = ctime(&tp);
18 q = *localtime(&tp);
19 *year = q.tm_year;
20 *mon = q.tm_mon + 1;
21 *day = q.tm_mday;
22 *hour = q.tm_hour;
23 *min = q.tm_min;
24
25 return;
26}
void uxdate_(int *year, int *mon, int *day, int *hour, int *min)
****INTEGER imax DOUBLE PRECISION m_pi *DOUBLE PRECISION m_amfin DOUBLE PRECISION m_Chfin DOUBLE PRECISION m_Xenph DOUBLE PRECISION m_sinw2 DOUBLE PRECISION m_GFermi DOUBLE PRECISION m_MfinMin DOUBLE PRECISION m_ta2 INTEGER m_out INTEGER m_KeyFSR INTEGER m_KeyQCD *COMMON c_Semalib $ !copy of input $ !CMS energy $ !beam mass $ !final mass $ !beam charge $ !final charge $ !smallest final mass $ !Z mass $ !Z width $ !EW mixing angle $ !Gmu Fermi $ alphaQED at q
Definition: KKsem.h:33