Lines Matching refs:LAST
104 LAST = 1
108 20004 NEXT=PRGOPT(LAST)
128 KEY = PRGOPT(LAST+1)
133 MINPRB = PRGOPT(LAST+2).EQ.ZERO
144 KPRINT=PRGOPT(LAST+2)
152 IF (PRGOPT(LAST+2).NE.ZERO) IDG=PRGOPT(LAST+3)
168 IF(PRGOPT(LAST+2).NE.ZERO) IPAGEF = PRGOPT(LAST+3)
175 CONTIN = PRGOPT(LAST+2).NE.ZERO
183 IF(PRGOPT(LAST+2).NE.ZERO) ISAVE = PRGOPT(LAST+3)
191 SAVEDT=PRGOPT(LAST+2).NE.ZERO
199 IF (PRGOPT(LAST+2).NE.ZERO) MXITLP = PRGOPT(LAST+3)
206 USRBAS = PRGOPT(LAST+2) .NE. ZERO
213 IBASIS(I) = PRGOPT(LAST+2+I)
223 COLSCP = PRGOPT(LAST+2).NE.ZERO
230 CSC(J)=ABS(PRGOPT(LAST+2+J))
240 CSTSCP = PRGOPT(LAST+2).NE.ZERO
241 IF (CSTSCP) COSTSC = PRGOPT(LAST+3)
249 SIZEUP = PRGOPT(LAST+2).NE.ZERO
251 ASMALL = PRGOPT(LAST+3)
252 ABIG = PRGOPT(LAST+4)
261 IF (PRGOPT(LAST+2).NE.ZERO) TOLLS = MAX(EPS,PRGOPT(LAST+3))
269 STPEDG = PRGOPT(LAST+2).EQ.ZERO
277 IF (PRGOPT(LAST+2).NE.ZERO) ITBRC=MAX(ONE,PRGOPT(LAST+3))
285 IF (.NOT.(PRGOPT(LAST+2).NE.ZERO)) GO TO 20078
286 NPP=MAX(PRGOPT(LAST+3),ONE)
295 IF (.NOT.(PRGOPT(LAST+2).NE.ZERO)) GO TO 20084
296 TUNE=ABS(PRGOPT(LAST+3))
309 IF(PRGOPT(LAST+2).NE.ZERO)TOLABS=PRGOPT(LAST+3)
316 LAST = NEXT