From 607e56902621712d252ed90ca7df6e5285f6a56d Mon Sep 17 00:00:00 2001
From: John Darrington <john@darrington.wattle.id.au>
Date: Fri, 14 Nov 2008 18:56:56 +0900
Subject: [PATCH] Add useful test/example file.

---
 examples/grid.sps | 18 ++++++++++++++++++
 1 file changed, 18 insertions(+)
 create mode 100644 examples/grid.sps

diff --git a/examples/grid.sps b/examples/grid.sps
new file mode 100644
index 00000000..cfaa80a6
--- /dev/null
+++ b/examples/grid.sps
@@ -0,0 +1,18 @@
+COMMENT  -*-pspp-*- .
+
+COMMENT This program is useful for testing the behaviour of the Data and Variable Sheets.
+
+input program.
+  vector var(500 F8.3).
+  loop #c = 1 to 1000.
+    loop #v = 1 to 500.
+      compute var(#v) = #v + #c / 1000.
+    end loop.
+    end case.
+  end loop.
+  end file.
+end input program.
+
+save outfile='grid.sav'.
+
+execute.
-- 
2.30.2