#
#FILE = CDEFIO.RAT  FOR RATFOR.RAT
   COMMON /CDEFIO/ BP, BUF(BUFSIZE)
      INTEGER BP    		# NEXT AVAILABLE CHARACTER; INIT = 0
      CHARACTER BUF 		# PUSHED-BACK CHARACTERS