Files
tlib/oversampling/WDL/eel2/scripts/test_a.eel
2024-05-24 13:28:31 +02:00

23 lines
506 B
Plaintext

sum=0;
a= 1;
b = .1;
c= .2;
d = .5;
e = 4;
f = -0.2;
g = 0.3;
h = .37;
loop(62000,
i = 0;
sum=0.0;
loop(8192,
sum += i*(3+ a * b + c*d + e * (f - b*(-c) + g*(e-g*(-g)*g)) );
sum2 += (a*b)+(a*b)+((a*b)*((b*c)*((h*i)*(f*g))));
i += 0.001;
i2+=1;
);
);
printf("sum error %.18f %.18f\n", sum - 245333.476966294896556064, sum2 - 101488440.519564077258110046);
printf("sum error per inst %.18f %.18f\n", (sum - 245333.476966294896556064) / i, (sum2 - 101488440.519564077258110046)/i2);