From a1d18efc18772a233aa759b622c3a9960824f109 Mon Sep 17 00:00:00 2001
From: Justin Bedo <cu@cua0.org>
Date: Tue, 30 Apr 2019 09:47:49 +1000
Subject: cleanup examples and stray files

---
 examples/ex-wdl/wdl-scatter-gather.nix | 33 +++++++++++++++++++++++++++++++++
 1 file changed, 33 insertions(+)
 create mode 100644 examples/ex-wdl/wdl-scatter-gather.nix

(limited to 'examples/ex-wdl')

diff --git a/examples/ex-wdl/wdl-scatter-gather.nix b/examples/ex-wdl/wdl-scatter-gather.nix
new file mode 100644
index 0000000..387d382
--- /dev/null
+++ b/examples/ex-wdl/wdl-scatter-gather.nix
@@ -0,0 +1,33 @@
+# The scatter-gather example from https://github.com/openwdl/wdl
+# translated to bionix
+{ bionix ? import <bionix> {} }:
+
+with bionix;
+with lib;
+
+let
+
+  prepare = splitString "\n" (removeSuffix "\n" (readFile (stage {
+    name = "prepare";
+    buildInputs = [ pkgs.python3 ];
+    buildCommand = ''
+      python -c "print('one\ntwo\nthree\nfour', end=''')" > $out
+    '';
+  })));
+
+  analysis = str: removeSuffix "\n" (readFile (stage {
+    name = "analysis";
+    buildInputs = [ pkgs.python ];
+    buildCommand = ''
+      python -c "print('_${str}_')" > $out
+    '';
+  }));
+
+  gather = strs: stage {
+    name = "gather";
+    buildCommand = ''
+      echo ${concatStringsSep " " strs} > $out
+    '';
+  };
+
+in gather (map analysis prepare)
-- 
cgit v1.2.3