From f96ed474a97f9a0d64a926756d959413e8bddc00 Mon Sep 17 00:00:00 2001 From: Michael Beck Date: Sat, 1 Jul 2006 16:21:11 +0000 Subject: [PATCH] KahanSum example --- ir/be/test/kahansum.c | 12 ++++++++++++ 1 file changed, 12 insertions(+) create mode 100644 ir/be/test/kahansum.c diff --git a/ir/be/test/kahansum.c b/ir/be/test/kahansum.c new file mode 100644 index 000000000..5ef0745be --- /dev/null +++ b/ir/be/test/kahansum.c @@ -0,0 +1,12 @@ +float kahanSum(const float A[], int n) { + float sum = 0.0, C = 0.0, Y, T; + int i; + + for (i = 0; i < n; ++i) { + Y = A[i] - C; + T = sum + Y; + C = T - sum - Y; + sum = T; + } + return sum; +} \ No newline at end of file -- 2.20.1