SCALE
mag[i][j] = (m * SCALE) / p;
phs[i][j] = (c * SCALE) / p;
sin[i] = (sin[i] * SCALE) / div;
cos[i] = (cos[i] * SCALE) / div;
f2 = (f1 * f1 + f3 * f3) / SCALE;
if (txmag == SCALE)
rxmag = mag[0][0] - (cos[0] * txmag + sin[0] * txphs) / SCALE;
rxphs = phs[0][0] + (sin[0] * txmag - cos[0] * txphs) / SCALE;
if (-rxmag == SCALE)
txmag = (txmag * SCALE) / (SCALE - txmag);
q_coff = (txmag * 128) / SCALE;
i_coff = (txphs * 256) / SCALE;
rxmag = (-rxmag * SCALE) / (SCALE + rxmag);
q_coff = (rxmag * 128) / SCALE;
i_coff = (rxphs * 256) / SCALE;
txsum *= SCALE;
rxsum *= SCALE;
rosum *= SCALE;
x[i + 1] = ((txsum + nsamples) / nsamples + SCALE) / SCALE;
y[i + 1] = ((rxsum + nsamples) / nsamples + SCALE) / SCALE +
SCALE * maxidx + SCALE / 2;
G = ((y[6] - y[3]) * SCALE + (x[6] - x[3])) / (x[6] - x[3]);
icept = (G * (x[0] - x[3]) + SCALE) / SCALE + y[3];
x[i] = (y[i] * SCALE + G) / G;
xnonlin = x[maxidx] - (y[maxidx] * SCALE + G) / G;
xnonlin = x[i + I] - ((y[i + I] * SCALE) + G) / G;
y2 = (y[i + I] * y[i + I] + SCALE * SCALE) / (SCALE * SCALE);
in = y5 + y3 + (SCALE * tmp) / G;
%token SCALE IBASE OBASE AUTO
| SCALE LPAR expression RPAR
| SCALE