Warning, /include/hepdb/ctmpak.inc is written in an unsupported language. File is not indexed.
0001 *
0002 * $Id$
0003 *
0004 * $Log$
0005 * Revision 1.2 1999/08/17 12:42:50 mclareni
0006 * Y2k mods submitted by Rob Komar
0007 *
0008 * Revision 1.1.1.1 1996/02/28 16:24:05 mclareni
0009 * Hepdb, cdlib, etc
0010 *
0011 *
0012 #ifndef CERNLIB_HEPDB_CTMPAK_INC
0013 #define CERNLIB_HEPDB_CTMPAK_INC
0014 *
0015 *
0016 * ctmpak.inc
0017 *
0018 PARAMETER (MXSEC=61, MXMIN=61, MXHOU=25, MXDAY=32, MXMON=13)
0019 PARAMETER (MXYEA=134)
0020 INTEGER IDAYY(55), IDAYM(12,2)
0021 SAVE IDAYY, IDAYM
0022 DATA IDAYY / 366, 731, 1096, 1461, 1827, 2192, 2557,
0023 1 2922, 3288, 3653, 4018, 4383, 4749, 5114,
0024 2 5479, 5844, 6210, 6575, 6940, 7305, 7671,
0025 3 8036, 8401, 8766, 9132, 9497, 9862, 10227,
0026 4 10593,10958,11323,11688,12054,12419,12784,
0027 5 13149,13515,13880,14245,14610,14976,15341,
0028 6 15706,16071,16437,16802,17167,17532,17898,
0029 7 18263,18628,18993,19359,19724,20089/
0030 DATA IDAYM / 0, 31, 59, 90, 120, 151, 181, 212, 243,
0031 1 273, 304, 334, 0, 31, 60, 91, 121, 152,
0032 2 182, 213, 244, 274, 305, 335/
0033 *
0034
0035 #endif
