From: John Darrington <john@darrington.wattle.id.au>
Date: Fri, 14 Nov 2008 09:56:56 +0000 (+0900)
Subject: Add useful test/example file.
X-Git-Tag: v0.7.1~163
X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?p=pspp-builds.git;a=commitdiff_plain;h=607e56902621712d252ed90ca7df6e5285f6a56d

Add useful test/example file.
---

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.