[u/mrichter/AliRoot.git] / MINICERN / packlib / zebra / fq / fzrewex.inc

*
* $Id$
*
* $Log$
* Revision 1.1.1.1  1996/03/06 10:47:10  mclareni
* Zebra
*
*
*
* fzrewex.inc
*
#if (defined(CERNLIB_QMIBM))&&(defined(CERNLIB_IOPACK))
      IF (IACMOF.EQ.0)             GO TO 28
      CALL IORWND (LUNF,ISW)
      GO TO 29
#endif
*
* fzrewex.inc
*
#if defined(CERNLIB_QMND3)
      IF (IACMOF.EQ.0)             GO TO 28
      NIL = 0
      CALL MAGTP (13B,NIL,LUNF,NIL,NIL)
      GO TO 29
#endif
Commit	Line	Data
fe4da5cc	1	*
	2	* $Id$
	3	*
	4	* $Log$
	5	* Revision 1.1.1.1 1996/03/06 10:47:10 mclareni
	6	* Zebra
	7	*
	8	*
	9	*
	10	* fzrewex.inc
	11	*
	12	#if (defined(CERNLIB_QMIBM))&&(defined(CERNLIB_IOPACK))
	13	IF (IACMOF.EQ.0) GO TO 28
	14	CALL IORWND (LUNF,ISW)
	15	GO TO 29
	16	#endif
	17	*
	18	* fzrewex.inc
	19	*
	20	#if defined(CERNLIB_QMND3)
	21	IF (IACMOF.EQ.0) GO TO 28
	22	NIL = 0
	23	CALL MAGTP (13B,NIL,LUNF,NIL,NIL)
	24	GO TO 29
	25	#endif