Awkfloat
extern Awkfloat *NR;
extern Awkfloat *FNR;
extern Awkfloat *NF;
extern Awkfloat *RSTART;
extern Awkfloat *RLENGTH;
Awkfloat fval; /* value as number */
extern Cell *setsymtab(const char *, const char *, Awkfloat,
extern Awkfloat setfval(Cell *, Awkfloat);
extern Awkfloat getfval(Cell *);
extern Awkfloat *ARGC;
(void) setfval(nfloc, (Awkfloat)lastfld);
(void) setfval(nfloc, (Awkfloat)n);
Awkfloat srand_seed = 1;
Awkfloat i, j = 0;
Awkfloat xf;
Awkfloat xf, yf;
Awkfloat u;
Awkfloat tmp;
u = (Awkfloat) (rand() % RAND_MAX) / RAND_MAX;
(void) setfval(x, (Awkfloat) stat);
(void) setfval(r, (Awkfloat)n);
extern Awkfloat srand_seed;
(void) setfval(rstartloc, (Awkfloat)start);
(void) setfval(rlengthloc, (Awkfloat)patlen);
Awkfloat j;
Awkfloat val;
if ((Awkfloat)INT_MAX < val)
Awkfloat v = 0.0;
v = (Awkfloat) (p1 - s1 + 1); /* origin 1 */
ARGC = &setsymtab("ARGC", "", (Awkfloat)ac, NUM, symtab)->fval;
setsymtab(const char *n, const char *s, Awkfloat f, unsigned int t, Array *tp)
Awkfloat
setfval(Cell *vp, Awkfloat f) /* set float val of a Cell */
Awkfloat f;
Awkfloat
Awkfloat *NF; /* number of fields in current record */
Awkfloat *NR; /* number of current record */
Awkfloat *FNR; /* number of current record in current file */
Awkfloat *ARGC; /* number of arguments from command line */
Awkfloat *RSTART; /* start of re matched with ~; origin 1 (!) */
Awkfloat *RLENGTH; /* length of same */