/usr/include/zebra/jztimout.inc is in libpacklib1-dev 20061220+dfsg3-4.2.
This file is owned by root:root, with mode 0o644.
The actual contents of the file can be viewed below.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 | *
* $Id: jztimout.inc,v 1.1.1.1 1996/03/06 10:46:55 mclareni Exp $
*
* $Log: jztimout.inc,v $
* Revision 1.1.1.1 1996/03/06 10:46:55 mclareni
* Zebra
*
*
#ifndef CERNLIB_ZEBRA_JZTIMOUT_INC
#define CERNLIB_ZEBRA_JZTIMOUT_INC
*
*
* jztimout.inc
*
#if defined(CERNLIB_JZTIME)
IF (JQTIME.NE.0) THEN
IF (LQSV.NE.0) THEN
CALL TIMED (DELTAT)
Q(KQS+LQSV+5) = Q(KQS+LQSV+5) + DELTAT
Q(KQS+LQSV+6) = MAX (Q(KQS+LQSV+6),Q(KQS+LQSV+5))
Q(KQS+LQSV+8) = Q(KQS+LQSV+8) + Q(KQS+LQSV+5)
Q(KQS+LQSV+5) = 0.
IF (32*Q(KQS+LQSV+8) .GT. Q(KQS+LQSV+7)) THEN
Q(KQS+LQSV+7) = Q(KQS+LQSV+7) + Q(KQS+LQSV+8)
Q(KQS+LQSV+8) = 0.
ENDIF
ENDIF
ENDIF
#endif
#endif
|