0041# FILE = CLINE.RAT FOR RATFOR.RAT0065# PCN #75, DEC 79, ADD FORTRAN LINE NUMBERS TO RATFOR LISTING0064 COMMON /CLINE/ LEVEL, INFILE(NFILES), LINECT, INIF, FTNLN0061 INTEGER LEVEL # LEVEL OF FILE INCLUSION; INIT = 10071 INTEGER INFILE # FILE NUMBER(LEVEL); INIT INFILE(1) = STDIN0066 INTEGER LINECT # RATFOR SOURCE CODE LINE NUMBER, INIT=10070 INTEGER INIF # =YES WHEN INSIDE AN UNDEFINED IFDEF; INIT=NO0061 INTEGER FTNLN #CURRENT FORTRAN LINE NUMBER, INIT=0^^^^^^^^^^^^^