/usr/include/isajet758/jwork.inc is in libisajet758-3-dev 20061220+dfsg3-3.
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 | #ifndef CERNLIB_ISAJET_JWORK_INC
#define CERNLIB_ISAJET_JWORK_INC
*
*
* jwork.inc
*
COMMON/JWORK/ZZC(MXJSET),JMATCH(MXJSET),TNEW,P1CM(4),
1J1,J2,J3,J4,J5,E1CM,E2CM,E3CM,E4CM,E5CM
SAVE /JWORK/
LOGICAL TNEW
EQUIVALENCE (J1,JJ(1)),(E1CM,EE(1))
INTEGER JMATCH,J1,J2,J3,J4,J5,JJ(5)
REAL ZZC,P1CM,E1CM,E2CM,E3CM,E4CM,E5CM,EE(5)
#endif
|