blob: 8bd28ad24ae03f1c636166f52f68484d8a7eaa7e [file] [log] [blame]
/* { dg-do compile } */
/* { dg-options "-O3" } */
void Lag_max_wght(float corr[], long wght_flg)
{
float t0, max;
const float *ww;
long i;
if ( wght_flg > 0 ) {
for ( i = 143; i >= 20; i-- ) {
t0 = corr[ - i] * *ww--;
if ( t0 >= max )
max = t0;
}
}
}