Changes between Version 11 and Version 12 of AnnPerformance

Timestamp:

05/23/08 19:28:46 (15 years ago)

Author:

hartono

Comment:

--

AnnPerformance

@@ -40 +40 @@
  [[Image(lu-par.png,nolink)]]
 
+== 3-D Gauss Seidel ==
+
+=== Original code ===
+{{{
+for (t=0; t<=T-1; t++)
+  for (i=1; i<=N-2; i++)
+    for (j=1; j<=N-2; j++)
+      A[i][j] = (A[i-1][j-1] + A[i-1][j] + A[i-1][j+1]
+                + A[i][j-1] + A[i][j] + A[i][j+1]
+                + A[i+1][j-1] + A[i+1][j] + A[i+1][j+1]) / 9.0;
+}}}
 
 
-