Add a simple example.

1 files changed, 22 insertions, 0 deletions

diff --git a/README.org b/README.org
index 7d2e607..01fe187 100644
--- a/README.org
+++ b/README.org
@@ -2,3 +2,25 @@
 
 #+TITLE: README for Guile Drmaa
 
+Hi there!  Currently, this project only provides low-level bindings to DRMAA version 1.  Here’s an example:
+
+#+begin_src scheme
+(use-modules (drmaa v1 low))
+
+(define (test)
+  (let ((t (allocate-job-template!)))
+    (set-attribute! t (DRMAA 'REMOTE_COMMAND) "/bin/ls")
+    (set-attribute! t (DRMAA 'JS_STATE)
+                    (DRMAA 'SUBMISSION_STATE_ACTIVE))
+    (set-attribute! t (DRMAA 'WD)
+                    "/home/rwurmus/")
+    (apply set-vector-attribute! t (DRMAA 'V_ENV)
+           (list "USER=rwurmus" "USER=rwurmus" "you"))
+    (run-job t)))
+
+(init-session!)
+(test)
+(exit-session!)
+#+end_src
+
+Higher level bindings will be added eventually.