Lines Matching full:scal
65 word R, S, dmax, scal, best_k;
82 if (dmax == 0) scal = 0;
87 if (temp > 6) scal = 0;
88 else scal = 6 - temp;
89 assert(scal >= 0);
95 wt_k = SASR(d[best_k], scal);
109 assert(scal <= 100 && scal >= -100);
110 L_max = L_max >> (6 - scal); /* sub(6, scal) */
168 word R, S, dmax, scal;
182 if (dmax == 0) scal = 0;
188 if (temp > 6) scal = 0;
189 else scal = 6 - temp;
191 assert(scal >= 0);
196 for (k = 0; k <= 39; k++) wt[k] = SASR( d[k], scal );
244 assert(scal <= 100 && scal >= -100);
245 L_max = L_max >> (6 - scal); /* sub(6, scal) */
309 word R, S, dmax, scal;
323 if (dmax == 0) scal = 0;
329 if (temp > 6) scal = 0;
330 else scal = 6 - temp;
332 assert(scal >= 0);
333 ltp_cut = (longword)SASR(dmax, scal) * st->ltp_cut / 100;
340 register word w = SASR( d[k], scal );
424 assert(scal <= 100 && scal >= -100);
425 L_max = L_max >> (6 - scal); /* sub(6, scal) */
485 word R, S, dmax, scal;
499 if (dmax == 0) scal = 0;
505 if (temp > 6) scal = 0;
506 else scal = 6 - temp;
508 assert(scal >= 0);
513 for (k = 0; k < 40; k++) wt_float[k] = SASR( d[k], scal );
589 assert(scal <= 100 && scal >= -100);
590 L_max = L_max >> (6 - scal); /* sub(6, scal) */
