5 * Revision 1.1.1.1 1996/02/15 17:50:34 mclareni
9 #include "kerngen/pilot.h"
10 #if defined(CERNLIB_QMIRT)
11 #include "irtngs/xinbf.F"
12 #elif defined(CERNLIB_QMIRTD)
13 #include "irtdgs/xinbf.F"
15 SUBROUTINE XINBF (LUN,XBV,NXB)
17 C CERN PROGLIB# Z203 XINBF .VERSION KERNFOR 4.31 911111
22 READ (LUN,IOSTAT=JSTAT) XBV