5 * Revision 1.1.1.1 1996/03/06 10:47:11 mclareni
13 #if defined(CERNLIB_QMIRT)
14 IF (ISW.EQ.122) GO TO 841
20 #if defined(CERNLIB_QMIRTD)
21 IF (ISW.EQ.122) GO TO 841
22 * needs packing machine words <-> file words
23 #ifndef CERNLIB_FQNEEDPK
25 * needs convert machine words <-> file words
26 #ifndef CERNLIB_FQNEEDCV
28 * -------------- sequences for output ---------------------