From 983749787ee0dc1beb1107873e8a13ebdaeba576 Mon Sep 17 00:00:00 2001 From: Derick Huth Date: Mon, 18 Jan 2016 15:43:52 -0700 Subject: restore test suite --- test-chill/test-cases/examples/chill/jacobi1.c | 19 +++++++++++++++++++ 1 file changed, 19 insertions(+) create mode 100644 test-chill/test-cases/examples/chill/jacobi1.c (limited to 'test-chill/test-cases/examples/chill/jacobi1.c') diff --git a/test-chill/test-cases/examples/chill/jacobi1.c b/test-chill/test-cases/examples/chill/jacobi1.c new file mode 100644 index 0000000..e7ff8f8 --- /dev/null +++ b/test-chill/test-cases/examples/chill/jacobi1.c @@ -0,0 +1,19 @@ + +#ifndef N +#define N 512 +#endif + +/* + +procedure int jacobi( + in out float[N][N] a = matrix [i,j] random(2,-2)) + +*/ +int jacobi(float a[N][N]) { + int t, i; + for (t = 2; t <= 100; t++) + for (i = 2; i <= N - 1; i++) + a[t][i] = a[t - 1][i - 1] + a[t - 1][i] + a[t - 1][i + 1]; + + return 0; +} -- cgit v1.2.3-70-g09d2