Searched refs:NDIGI (Results 1 – 5 of 5) sorted by relevance
28 NDIGI = MIN0(I1MACH(8),I1MACH(11)) - 134 NPART = (NDIGD + NDIGI -1) / NDIGI35 SCALE = IBASE**NDIGI
108 #define NDIGI 17 /* no Match non-digit char */ macro
504 ret = regnode (NDIGI); in regatom()1090 case NDIGI: in regmatch()1196 case NDIGI: in regrepeat()1367 case NDIGI: in regprop()
19193 NDIGI=NDIGI+119196 NDIGI=NDIGI+119199 NDIGI=NDIGI+119202 NDIGI=NDIGI+119205 NDIGI=NDIGI+119208 NDIGI=NDIGI+119211 NDIGI=NDIGI+119214 NDIGI=NDIGI+119217 NDIGI=NDIGI+119221 NDIGI=NDIGI+1[all …]
6576 NDIGI=MAXDIG6607 NDIGI=06619 NDIGI=NDIGI+16620 DIGITS(NDIGI)=IDIG6624 IF(NDIGI.GT.0)THEN6625 XDIGI=REAL(INT(X(1)))*(10**NDIGI)6626 DO400I=1,NDIGI6627 ATEMP=DIGITS(I)*(10**(NDIGI-I))6630 XDIGI=XDIGI/(10**NDIGI)6644 WRITE(ICOUT,811)N,NDIGI[all …]